ЭИ
Эмиль Ибрагимов

" Складіть програму обчислення суми цифр цілого трьохзначного числа. "

Мне короче надо разбить число из 3 цифр на 3 отдельные цифры... На пасхале... с помощь Mod и Div помогите плз )

Ил
Ильвир

readln(n)
s:=0;
for i:=1 to 3 do
begin
s:=s + n mod 10;
n:=n div 10;

Похожие вопросы
Написати програму, що вводить число з 4 цифр, розділяє число на окремі цифри і друкує їх окремо одну від одної. Наприкла
Скласти програму, яка знаходить найбільше значення відношення тризначного числа до суми його цифр на С
В натуральном числе переставить цифры таким образом, чтобы получилось наибольшее число, записанное теми же цифрами.
Заповнити масив різними числами Армстронга. Числом Армстронга називають натуральне n-цифрове число, сума цифр якого, під
помогите пожалуйста в Visual basic. Дано натуральное число N! вычислить суму цифр в числе N
Скласти програму обчислення суми парних чисел у інтервалі від 0 до 10 в C++
Дано четырехзначное число. Найти произведение цифр этого числа.
посчитать сумму цифр числа без цикла? с++
Дано трократное число, Определить: кратна ли сума его цифр числу а
еаписать програму умножения двоичного числа на 11