Помогите пожалуйста! По информатике! Напишите программу,которая производит обмен значений...

0 голосов
52 просмотров

Помогите пожалуйста!
По информатике!
Напишите программу,которая производит обмен значений переменных х,у,если х больше у.
Пример входных данных Пример выходных данных
x>>5 x=5
y>>6 y=6
x>>6 x=5
y>>5 y=6


Информатика (61 баллов) | 52 просмотров
Дан 1 ответ
0 голосов
Правильный ответ

Var x,y,z:integer;
begin
writeln('Введите x и y');
read(x,y);i
f x>y then begin
z:=x;
x:=y;
y:=z;
end;
writeln(x,y:3);
end.

(1.7k баллов)