Question

Определите , что будет напечатано после выполнения программы: var k, s : integer ; begin k := 1; s := 3; while s < 100 do begin s := s + 5 ; k := k + 2 end; write(k) end

Answer 1

Ответ:

41

Объяснение:

k = 1

s = 3

Цикл выполняется пока s < 100 (while s < 100)

каждый повтор цикла s увеличивается на 5 (s = s + 5 )

каждый повтор цикла k увеличивается на 2 (k = k + 2)

Цикл выполнится 20 раз (100 / 5 = 20)

k = 1 + 2 * 20 = 41

Answer 2

Давайте проанализируем эту программу.

Изначально заданы две переменные: k и s. k установлена в 1, а s установлена в 3.

Затем начинается цикл while, который будет выполняться до тех пор, пока s меньше 100. Внутри цикла выполняются две операции:

1. s увеличивается на 5: s := s + 5;
2. k увеличивается на 2: k := k + 2;

Цикл будет выполняться до тех пор, пока s не станет больше или равной 100. Давайте рассмотрим, как изменяются k и s на каждой итерации:

1. Первая итерация: s становится равной 8, k становится равной 3.
2. Вторая итерация: s становится равной 13, k становится равной 5.
3. Третья итерация: s становится равной 18, k становится равной 7.
4. И так далее...

Цикл будет выполняться, пока s не достигнет или превысит значение 100. Когда s становится равной 98, следующая итерация увеличит s до 103, и условие цикла (s < 100) больше не будет выполняться. Цикл завершается.

Итак, после выполнения программы будет выведено значение переменной k, которая в конечном итоге будет равной 7, так как на последней итерации цикла она увеличивается на 2 и становится равной 7.

Таким образом, программа выведет "7".