Решение задачи Begin 24

#include <iostream>
using namespace std;
int main(){
	double A,B,C,x,y;
	cout << "Vvedite znacheniye peremennoy A: ";
	cin >> A;
	cout << "Vvedite znacheniye peremennoy B: ";
	cin >> B;
	cout << "Vvedite znacheniye peremennoy C: ";
	cin >> C;
	x = C;
	C = A;
	y = B;
	B = x;
	A = y;
	cout << "A: " << A << endl;
	cout << "B: " << B << endl;
	cout << "C: " << C << endl;
	return 0;
}

import random

A,B,C = sorted(random.sample(range(-10, 10), 3))
print("A = {0}, B = {1}, C = {2}".format(A,B,C))

A,C = C,A
A,B = B,A
print("A = {0}, B = {1}, C = {2}".format(A,B,C))
									

program Begin24;
var
  A,B,C,TempR: Real;
begin
  Write('Введите значение A: ');
  Readln(A);
  Write('Введите значение B: ');
  Readln(B);
  Write('Введите значение C: ');
  Readln(C);
  TempR:=A;
  A:=C;
  C:=B;
  B:=TempR;
  Writeln('Переменная A имеет значение: ',A);
  Writeln('Переменная B имеет значение: ',B);
  Writeln('Переменная C имеет значение: ',C);
end.