Составить программу, сумма цифр пятизначного числа

Ответы:

МИЛЕНА ДОЛИНСКАЯ

09-11-2018 01:40

Var n,s : Integer;Begin Readln(n); s:=0; While n>0 do Begin s:=s+(n mod 10); n:=n div 10; end; Writeln(s);end.

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

1.Определите по вопросам и предлогам падежи сущ.,1-го склонения. Спустились с (Лест Плоды семейства крастоцветов

Картинка с текстом вопроса от пользователя Ваня Передрий

⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Составить программу, сумма цифр пятизначного числа» от пользователя Ваня Передрий в разделе Информатика. Задавайте вопросы и делитесь своими знаниями.

Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!