Регистрация
buraya1989
04.09.2021 06:41
Информатика
Есть ответ 👍

Как на pascal abc написать программу, которая будет считать сумму цифр числа, введенного с клавиатуры? количество цифр в числе неизвестно! число целое. желательно с объяснениями (вне программы). заранее ! p.s. я 15 ! !

272
406
Посмотреть ответы 2

Ответы на вопрос:

maratkhan0311
maratkhan0311
4,4(93 оценок)
Program lol2016; var n,s,r: integer; begin readln(n); s: =0; while(n < > 0) do begin r: =n mod 10; s: =s+r; n: =n div 10; end; writeln(s); end. если что то не понятно просто спроси и я обьясню    : )
Xomawq
Xomawq
4,8(18 оценок)
Тело цикла будет выполнено 31 раз. следовательно переменная s станет равна 93

Популярно: Информатика