52

Дано целое число N (>0)

cergeytom 18 апреля 2023

Дано целое число N (>0). Используя операции деления нацело и взятие остатка от деления найти количество и сумму его цифр.

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

84

var n,count,sum: integer; begin read (n); count: =0; sum: =0; while (n<>0) do inc (count); sum: =sum+(n mod 10); n: =n div 10; endend.

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

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

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