Написать программу нахождения суммы цифр трехзначного числа (для отрицательных и положительных чисел)

13 Мар 2020 в 19:41
196 +1
0
Ответы
1

var a,s: integer;

begin

readlnaaa;

a:=absaaa;

s:=adiv100a div 100adiv100+adiv10mod10a div 10 mod 10adiv10mod10 + amod10a mod 10amod10;

writelnsss;

end.

17 Мар 2020 в 15:23
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
Прямой эфир