Ответ(ы) на вопрос:
var a,b,c,e,f,s:integer; begin b:=a mod 10; c:=a div 10 mod 10; d:=a div 100 mod 10; e:=a div 1000; s:=c+d=e+b; end.
Не нашли ответ?
Похожие вопросы