Опубликовано 13.06.2017 по предмету Информатика от Гость >> <<

Исходное данное-целое трехзначное число х. выполните для х-248 и х-789 следующий алгоритм:
а:=х div 100
b:=x mod 100 div 10
c:=x mod 10
s:=a+b+c
пожалуйста

Ответ оставил Гость

Var a,b,c,s,x: integer;
begin
  write(x = );  readln(x);
  а:=х div 100;
  b:=x mod 100 div 10;
  c:=x mod 10;
  s:=a+b+c;
  writeln(s);
end.
При вводе  x = 248 будет напечатано  14,   при вводе x = 789 будет напечатано 24