Поменять местами ячейки. пример а=3,b=5=gt;a=5,b=3.паскаль
Поменять местами ячейки. пример а=3,b=5=>a=5,b=3.паскаль
Гость
Ответ(ы) на вопрос:
Гость 1.
var a,b,c:integer;
begin
a:=3; b:=5;
writeln('a = ',a,' b = ',b);
c:=a;
a:=b;
b:=c;
writeln('a = ',a,' b = ',b);
end.
Результат:
a = 3 b = 5
a = 5 b = 3
2.
var a,b:integer;
begin
a:=3; b:=5;
writeln('a = ',a,' b = ',b);
a:=a+b;
b:=a-b;
a:=a-b;
writeln('a = ',a,' b = ',b);
end.
Результат:
a = 3 b = 5
a = 5 b = 3
Не нашли ответ?
Похожие вопросы