Определите значение переменной X После выполнения следующего фрагмента программы:x:=1;for...

Question

Определите значение переменной X После выполнения следующего фрагмента программы:x:=1;for i:=1 to 5 do begin x:=x+2*i;x:=x+1;end;​

Answer 1

Ответ: 36

Объяснение: вот полноценная программа

var

x,i,n:integer;

begin

x:=1;

i:=0;

for i:=1 to 5 do begin x:=x+2*i;

x:=x+1;

end;

writeln('Ответ = ',x);

readln;

end.