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