var
a,b: integer;
function max(a, b: integer): integer;
begin
if a > = b then
max: =a else max : = b; end;
function min(a, b: integer): integer;
begin
if a < = b then
min : = a else min : = b;
end;
begin
write ('введите число a ');
readln (a);
write ('введите число b ');
readln (b);
writeln(max(a,b)-min(a,b));
end.
Поделитесь своими знаниями, ответьте на вопрос: