Предмет: Информатика,
автор: Gextar
Turbo Pascal Человек ввел трехзначное число, при помощи функций div и mod найти их сумму.
Ответы
Автор ответа:
0
program xxx;
var n, c, d, e, s : integer;
begin
write('введите число');
readln(n);
c:= n div 100;
d:=(n div 10) mod 10;
e:= n mod 10;
s:= c + d + e;
writeln('сумма чисел =', s);
readln
end.
Похожие вопросы
Предмет: Қазақ тiлi,
автор: saniamajdan
Предмет: ОБЖ,
автор: lisska3591
Предмет: История,
автор: sofiagladun123
Предмет: Математика,
автор: есенина
Предмет: Математика,
автор: vikqa