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

1

Ответы и объяснения

2012-12-17T16:54:57+04:00

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

n,a as integer

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

if a<0 then 

a:=a*-1;

write(a);

end.