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

Var s, i:integer; Begin S := 3;  For i := 2 to 5 do //будет выполнено 4 раза S := S + 2*i; Writeln(S); end. То есть на первом шаге цикла мы имеем s=3+2*2=7 2: s=7+2*3=13 3: s=13+2*4=21 4: s=21+2*5=31 Ответ: 31 Var k, s: integer; Sea: array [1..12] of integer; begin Sea[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; //начальное значение s For k := 1 to 12 do //будет выполнено 12  раз if Sea[k] > 220 then  begin s := s + Sea[k]; end; Writeln(s); end. Таким образом, 12 раз проверяется условие, больше ли за определённый год( соответствует шагу цикла) приплыло людей, чем 220. В первый раз условие будет выполнено на 5 шаге s=100+230=330,  второй- на 7 s=330+240=570 Ответ: 570 5)A2=2 B2=7 C2=X D2=5 На графике видно, что 2 сектора равны. 1)x=2, слишком мало 2)x=4, не равен ни одному сектору 3)x=7 4)x=11, смотри пункт 2 Ответ: 3