Question

помогите пожалуйста разобраться в задаче​

Answer 1

Ответ:

program obmen;

var x,y,z:integer;

begin

writeln('введите  x');

readln(x);

writeln(' введите y');

readln(y);

if x>y

then z:=x;

if z>y

then x:=y;

if z>x

then y:=z;

writeln('x= ', x);

writeln('y = ', y);

end.

Объяснение:

Смотри, ты вводишь x и y, и если x>y, то через if-ы присваиваешь значение x значению z; значению x значение y и значению y значение z