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