64

Составить программу к решению задачи: «дано число…

nukleofil 19 августа 2022

Составить программу к решению задачи: «дано число n. Найти сумму и количество егоцифр.

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

79

Var a,b,k,c,d: integer; beginread (a); k: =0; c: =10; while k<>0 do beginb: =b+a mod c; k: =a div c; inc (d); end; write (b,d); end.

пользователи выбрали этот ответ лучшим
Знаете другой ответ?

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