88

Дано натуральное четырехзначное число n. Найти сумму его цифр.

03 марта 2023

Дано натуральное четырехзначное число n. Найти сумму его цифр.

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

99

Паскаль же? var s, x: string; c, n, err, i, d, k: integer; begin readln (s); n: =length (s); for i: =1 to n do begind: =d+k; val (s,k,err); end; write (d); end.

Знаете ответ?

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