var a,b,c,a1,b1,c1:real;
begin
readln(a,b,c);
b1:=a;
c1:=b;
a1:=c;
writeln(a1,b1,c1);
end.
program cikl;
var a,b,c,i,j,k:integer;
writeln('BBedute A,B,C');
i:=a;
j:=b;
k:=c;
a:=j;
b:=k;
c:=i;
writeln('a=',a,'b=',b,'c=',c);
readln
var a,b,c,a1,b1,c1:real;
begin
readln(a,b,c);
b1:=a;
c1:=b;
a1:=c;
writeln(a1,b1,c1);
end.
program cikl;
var a,b,c,i,j,k:integer;
begin
writeln('BBedute A,B,C');
readln(a,b,c);
i:=a;
j:=b;
k:=c;
a:=j;
b:=k;
c:=i;
writeln('a=',a,'b=',b,'c=',c);
readln
end.