Напишите функцию, которая определяет сумму цифр переданного ей числа, в системе паскаль

Ответы:

Ксения Ткаченко

14-08-2015 06:19

program axaxa;var n,a,s:integer;beginreadln(n);s:=0;while n>0 dobegina:=n mod 10;s:=s+a;n:= n div 10;end;writeln(s);end.

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

Картинка с текстом вопроса от пользователя Ульяна Рудич

⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Напишите функцию, которая определяет сумму цифр переданного ей числа, в системе паскаль» от пользователя Ульяна Рудич в разделе Экономика. Задавайте вопросы и делитесь своими знаниями.

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