Поменять значения переменных А,В,С чтобы оказалось А=>В=>С

Question

Поменять значения переменных А,В,С чтобы оказалось А=>В=>С

Answer 1

Var a,b,c,d:integer;
begin
writeln('a, b, c:');
readln(a,b,c);
if aif bif awriteln('a = ',a,' b = ',b,' c = ',c);
end.

Пример:
a, b, c:
5 2 8
a = 8 b = 5 c = 2