Задание:
Дано двузначное число. Определить больше ли число или сумма его цифр. Составитьпрограмму
Решение:
var a,b,c: integer; begin writeln ('Введите двузначное число'); readln (a); b: =a mod 10; c: =a div 10; if b+c>a then writeln ('Сумма чисел разрядов больше, чем само число') else writeln ('Число больше, чем сумма его рзазрядов'); end.
Знаете другой ответ?