Question

дано трех значное число найти сумму его цифор

Answer 1

var x:integer;

begin

readln(x);

writeln(x mod 10+(x div 10 mod 10)+x div 100);

end.