Лонгин
4 год назад
написать в тетради программу, в которой пользователь вводит целое 3-хзначное число, необходимо найти сумму его цифр
ОТВЕТЫ
Joseph John
Oct 24, 2020
var s: integer;
begin
readln(s);
s:= (s div 100)+((s div 10) mod 10)+(s mod 10);
writeln (s);
end.
begin
readln(s);
s:= (s div 100)+((s div 10) mod 10)+(s mod 10);
writeln (s);
end.
347
Смежные вопросы: