82

Ввести целое число и найти сумму его цифр (1234) Паскаль

rezonans 05 июля 2022

Ввести целое число и найти сумму его цифр (1234) Паскаль

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

34

var s,i: integer; begin readln (i); s: =0; repeat s: =i mod 10+s; i: =i div 10 until i=0; writeln (s); readln end.

пользователи выбрали этот ответ лучшим

Знаете другой ответ?
Другие вопросы по информатике

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