Помогите 20 БАЛЛОВ . Вопрос по информатиее

Question

Помогите 20 БАЛЛОВ
.
Вопрос по информатиее

---

Answer 1

Var
 a,b,c,n:longint;
begin
 readln(a,b,c);
 n:=a;
 a:=b;
 b:=c;
 c:=n;
 writeln(a,b,c);
end.