Решите пожалуйста 7 класс Найти сумму цифр двухзначного числа, прошу вас,заранее спасибо
Решите пожалуйста 7 класс
Найти сумму цифр двухзначного числа, прошу вас,заранее спасибо
Гость
Ответ(ы) на вопрос:
ГостьProgram n1;
var a,sum: integer;
begin
write('введите число: ');
readln(a);
sum:=(a mod 10)+(a div 10);
writeln('сумма цифр числа ',a,' равна ',sum);
end.
Не нашли ответ?
Похожие вопросы