88

Нужно написать программу для нахождения суммы цифр любого…

kostya_risk 26 февраля 2023

Нужно написать программу для нахождения суммы цифр любого трехзначного числа, вводимого с клавиатуры во время работы программы) как это сделать спомощью mod или div без цикла?

категория: информатика

60

var summ, c: integer; begin write ('Введите число '); readln (c); summ: =c mod 10+(c div 10) mod 10+c div 100; writeln ('Сумма цифр числа ', c , ' равна ', summ); end.

пользователи выбрали этот ответ лучшим
Знаете другой ответ?

Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...