Ответ: 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