var s, i: integer;
begin
s := 1;
For i := 2 to 5 do
s := s * 2;
write(s);
end.

Запишите значение переменной s, полученное в результате работы следующей программы на языке программирования Паскаль.

блин я прост запутался я быстро писал

Var s, i: integer;begins := 1;For n := 2 to 5 dos := s * 3;write(s);end.Запишите значение переменной s, полученное в результате работы следующей программы на языке программирования Паскаль.

да емае, не i а n

короче ещё раз вопрос задам, по новой, без ошибок сделали, надеюсь...

мда..

Var s, i:integer;BeginS := 3; For i := 2 to 5 do //будет выполнено 4 разаS := S + 2*i;Writeln(S);end.То есть на первом шаге цикла мы имеем s=3+2*2=72: s=7+2*3=133: s=13+2*4=214: s=21+2*5=31Ответ: 31Var k, s: integer;Sea: array [1..12] of integer;beginSea[1] := 170; Sea[2] := 170; //заполняем массивSea[3] := 190; Sea[4] := 210;Sea[5] := 230; Sea[6] := 220;Sea[7] := 240; Sea[8] := 160;Sea[9] := 190; Sea[10] := 210; Sea[11] := 170; Sea[12] := 170;s := 100; //начальное значение sFor k := 1 to 12 do //будет выполнено 12  разif Sea[k] > 220 then begins := s + Sea[k];end;Writeln(s);end.Таким образом, 12 раз проверяется условие, больше ли за определённый год( соответствует шагу цикла) приплыло людей, чем 220. В первый раз условие будет выполнено на 5 шагеs=100+230=330, второй- на 7s=330+240=570Ответ: 5705)A2=2B2=7C2=XD2=5На графике видно, что 2 сектора равны.1)x=2, слишком мало2)x=4, не равен ни одному сектору3)x=74)x=11, смотри пункт 2Ответ: 3