Question

Запишите число, которое будет выведено в результате работы программы: var s, n: integer; begin s := 0; n := 1; while s*s <= 125 do begin s := s + 3; n := n * 2 end; writeln(n) end.

Answer 1

Ответ: 16

Объяснение:

s = 0

n = 1

пока 0 * 0 <= 125 делать:

s = 0 + 3 = 3

n = 1 * 2 = 2

пока 3 * 3 = 9 <= 125 делать:

s = 3 + 3 = 6

n = 2 * 2 = 4

пока 6 * 6 = 36 <= 125 делать:

s = 6 + 3 = 9

n = 4 * 2 = 8

пока 9 * 9  = 81 <= 125 делать:

s = 9 + 3 = 12

n  = 8 * 2 =16

пока 12 * 12 = 144 <= 125 - условие становится неверным, выход из программы.

n = 16

Answer 2

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

1. Инициализируется переменная s со значением 0 и переменная n со значением 1.
2. Затем начинается цикл while, который будет выполняться до тех пор, пока условие s*s <= 125 истинно.
3. Внутри цикла значение s увеличивается на 3 (то есть, s := s + 3).
4. Значение n умножается на 2 (то есть, n := n * 2).

Цикл продолжается до тех пор, пока квадрат значения s не станет больше 125.

Давайте вычислим последовательность значений s и n на каждой итерации:

1. s = 0, n = 1
2. s = 3, n = 2
3. s = 6, n = 4
4. s = 9, n = 8
5. s = 12, n = 16

Теперь квадрат последнего значения s равен 12^2 = 144, что больше 125. Таким образом, цикл завершается на этой итерации.

И, наконец, программа выводит значение переменной n, которое равно 16.