Question

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

Answer 1

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

Answer 2

Давайте разберем, как работает данная программа:

1. Инициализируется переменная s со значением 1.
2. Запускается цикл for с переменной i, начиная от 2 и заканчивая 5.
3. В каждой итерации цикла значение переменной s умножается на 2.
4. После завершения цикла, значение переменной s будет равно результату всех умножений.

Давайте выполним вычисления шаг за шагом:

Итерация 1: s = 1 * 2 = 2 Итерация 2: s = 2 * 2 = 4 Итерация 3: s = 4 * 2 = 8 Итерация 4: s = 8 * 2 = 16

Таким образом, значение переменной s после выполнения программы будет равно 16.