Предмет: Информатика,
автор: anekha18112000
Запишите на языке Паскаль программу циклического обмена значениями трёх переменных a, b,c.
Схема циклического обмена a-->b-->c
Например, если до обмена было:
a=1, b=2, c=3, то после обмена должно стать : a=2, b=3, c=1.
Ответы
Автор ответа:
0
var a,b,c,d:integer
begin
readln(a,b,c);
d:=a;
a:=b;
b:=c;
c:=d;
writeln(a,' ',b,' ',c);
end.
begin
readln(a,b,c);
d:=a;
a:=b;
b:=c;
c:=d;
writeln(a,' ',b,' ',c);
end.
Похожие вопросы
Предмет: Обществознание,
автор: mullseven
Предмет: Английский язык,
автор: Аноним
Предмет: Алгебра,
автор: met007
Предмет: Химия,
автор: sabitowaalisa