11, Определить значение переменной s после выполнения следующих команд. s:=3; i:=2; пока i<==17 выполнять начало цикла S:=S+1; i:=i+2; конец цикла s:=s+8;

Перепишем код на языке Паскаль:

program Example;

var

s, i:integer;

begin

s:=3;

i:=2;

while (i<=17) do

begin

s:=s+i;

i:=i+2;

write ('i=', i);

writeln (' s=', s);

end;

s:=s+8;

writeln ('Итого s=', s);

end.

Получим:

i=4 s=5

i=6 s=9

i=8 s=15

i=10 s=23

i=12 s=33

i=14 s=45

i=16 s=59

i=18 s=75

Итого s=83