Program programma;
Uses crt;
var x,y,r: integer;
Begin clrscr;
write(x = );
readln(x);
write(y = );
readln(y);
r:=abs(x-y);
writeln(Modul r = , r);
readln;
end.
Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.