С клавиатуры вводятся два числа x и y.

Найти разновидность z между большим и меньшим из них

Question

Миханя

27 декабря, 03:53

+4

Ответы (1)

Знаете ответ на вопрос?

Сысой · Answer 1

Var x, y, z : integer;

begin

read (x, y) ;

if x>y then z:=x-y else z:=y-x;

write (z) ;

end.

С клавиатуры вводятся два числа x и y.Найти разновидность z между большим и меньшим из них