Какой результат получится после выполнения программы?

program pr8;

var a,c,d,vce:interger;

begin

a:=14;

c:=a mod 2+2;

d:=sqr(c)+2;

a:d div 2;

vce:=a+c+d;

writeln('сумма равна-',vce);

end.

сумма равна -11

Сумма равна 11. Начнём с того, что решение полностью описано. Закончим тем, что надо меньше код программы засовывать в паскаль и запускать. А лучше посмотреть, как именно выводится запись суммы.

a := 14

c := a mod 2 + 2 = 14 mod 2 + 2 = 0 + 2 = 2

d := sqr(c) + 2 = sqr(2) + 2 = 4 + 2 = 6

a := d div 2 = 6 div 2 = 3

vce := a + c + d = 3 + 2 + 6 = 11

Ответ

11