n = int(input())
a = n // 100
b = n // 10 % 10
c = n % 10
print(a + b + c)
Pascal:
var
N: word; { Трехзначное число }
t1, t2, t3: byte; { Цифры трехзначного числа }
begin
write('Введите трехзначное число: ');
readln(N); {
writeln;
t3 := N mod 10; {
N := N div 10; {
t2 := N mod 10; {
t1 := N div 10; {
writeln('Сумма цифр: ', t1 + t2 + t3);
end.