Поменять местами два введенных числа. Паскаль.

Ответы

Ответ дал: Аноним
0
var
  m,n,t:integer;
begin
  Write('Введите два натуральных числа: '); Read(m,n);
  t:=m; m:=n; n:=t;
  Writeln('Результат обмена: ',m,', ',n)
end.

Тестовое решение:
Введите два натуральных числа: 35 -20
Результат обмена: -20, 35
Вас заинтересует