Решить в паскаль. дано число. найти количество цифр в числе и их сумму.

steshagoncharov steshagoncharov    2   03.10.2019 13:30    0

Ответы
Fatima82 Fatima82  09.10.2020 14:20

begin

var a := ReadInteger;

var s := 0;

println(a.ToString.Length);

while a <> 0 do

begin

s += a mod 10;

a := a div 10;

end;

println(s);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика