Вопрос от посетителя
Запишите на языке Паскаль программу циклического обмена значениями трёх переменных a,b,c.
Схема циклического обмена:
a <- b <- c
I ^
I I
v———>
Например, если до обмена было: a=1, b=2, c=3, то после обмена должно стать: a=2, b=3, c=1.
Отвечает Илюха:
var a,b,c,a1,b1,c1:real;
begin
readln(a,b,c);
b1:=a;
c1:=b;
a1:=c;
writeln(a1,b1,c1);
end.