Написать программу нахождения суммы цифр трёхзначного числа)напишите пожалуйста!)
Написать программу нахождения суммы цифр трёхзначного числа)напишите пожалуйста!)
Ответ(ы) на вопрос:
Var iNum: integer;
begin
readln(iNum);
writeln((iNum mod 10) + (iNum div 100 mod 10) + (iNum div 100));
end.
Не нашли ответ?
Похожие вопросы