Ответы
Ответ дал:
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
m,n,t:integer;
begin
Write('Введите два натуральных числа: '); Read(m,n);
t:=m; m:=n; n:=t;
Writeln('Результат обмена: ',m,', ',n)
end.
Тестовое решение:
Введите два натуральных числа: 35 -20
Результат обмена: -20, 35
Вас заинтересует
2 года назад
7 лет назад
7 лет назад
9 лет назад
10 лет назад