Вопрос от посетителя
4. Запишите на языке Паскаль программу циклического обмена значениями трёх переменных a,b,c. Например, если до обмена было: a=1, b=2, c=3, то после обмена должно стать: a=2, b=3, c=1.
Отвечает Илюха:
Program obmen;
Var a,b,c,x,y: integer;
Begin
A:=x;
B:=a;
C:=b;
X:=c;
writeLn (a,b,c)
End.