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

Question

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

Comments

какой язык ?

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.