Question

Исходное данное — трёхзначное число x. Выполни для x=114 следующий алгоритм.

a:=xdiv100

b:=xmod100

c:=xmod10

s:=a+b+c

Answer 1

var x,a,b,c,s: Integer;
begin
x:=114;
a:=x div 100;
b:=x mod 100;
c:=x mod 10;
s:=a+b+c;
writeln(s);
end.

Программа выведет на экран число: 19.