Составить программу на языке паскаль которая меняет местами два числа без ввода дополнительной ячейки

252

287

Посмотреть ответы 2

Ответы на вопрос:

papuh

Информатика

4,8(84 оценок)

A: =a+b; b: =a-b; a: =a-b; var a,b: real; procedure change(var a, b: real); begin a : = a + b; writeln(a); b : = a - b; writeln(b); a : = a - b; writeln(a); end; begin writeln('a, b: '); readln(a, b); writeln('a=', a); writeln('b=', b); change(a, b); writeln('a=', a); writeln('b=', b); readln; end.