Дано двузначное число. Найти модуль разности его цифр. По ПАСКАЛЮ НАПИШИТЕ РЕШЕНИЕ.

Ответы

Ответ дал: glebglebgleb
0

не знаю синтаксис паскаля, но думаю сможешь перевезти:

n,a as integer

a:=(n mod 10) - (n div 10);

if a<0 then 

a:=a*-1;

write(a);

end.

 

Похожие вопросы