Значение какой переменной вводится с клавиатуры? 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.​

dddddq    2   16.05.2021 21:52    4