Значение какой переменной вводится с клавиатуры? program n_4;
var
x, a, b, c, s: integer;
begin
writeln('Нахождение суммы цифр трёхзначного числа');
write('Введите исходное число»');
readln(x);
a := x div 100;
b := x mod 100 div 10;
c := x mod 10;
s := a + b + c;
writeln('s=', s)
end.
208
245
Ответы на вопрос:
Популярно: Информатика
-
IdzSen10.04.2022 11:59
-
kazbek625.06.2021 10:55
-
Snow24108.12.2021 22:30
-
Vika1002302.07.2020 13:16
-
gordeevlogain230.01.2021 18:08
-
Artemka161006.05.2023 23:06
-
alzqsanko07.05.2020 13:30
-
tryx102.10.2020 05:12
-
Melentii06.08.2021 23:53
-
observatorshkip06tpd12.09.2022 11:51