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

Ответы (1)

Мики 31.12.2024 5

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

Знаете правильный ответ?

Думаешь ответы не верны?

Найди верный ответ на вопрос по предмету Информатика, если вы не получили ответа или никто не дал верного ответа, то рекомендуется воспользоваться поиском и попытаться найти ответ на свой вопрос среди похожих запросов.

Воспользуйтесь поиском

Новые вопросы по предмету Информатика:

ПРЕДМЕТЫ