Значение какой переменной вводится с клавиатуры? 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.
x
Объяснение:
Оператор ввода с клавиатуры это readln
в данной программе с его вводится значение переменной х