Найдите сумму цифр трехзначного числа.решите пожалуйстаочень нужно !!
Найдите сумму цифр трехзначного числа.
решите пожалуйста
очень нужно !!
Гость
Ответ(ы) на вопрос:
Гостьprogram fofgogjoj;
var
n:integer;
begin
Writeln('Введите трёхзначное число');
Readln(n);
N:=(n div 100)+((n div 10) mod 10)+(n mod 10);
Writeln('Сумма цифр равна: ',n);
end.
Не нашли ответ?
Похожие вопросы