Склавиатуры вводится трёхзначное число нужно вывести сумму трех его разрядов

Бегемот505 Бегемот505    1   06.10.2019 21:00    0

Ответы
Alinka291002 Alinka291002  10.10.2020 00:23

Program n_1;

var x:integer;

begin

   readln(x);

   x:=(x mod 10) + ((x div 10) mod 10) + ((x div 100) mod 10);

   writeln(x);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика