Program gf; uses crt; var a,b,c,d:integer; begin writeln('Напишите числа'); readln(a,b,c); d:=b; b:=c; c:=a; a:=d; writeln(a,b,c); end.