Question

Lazarus: Виконайте фрагмент програми та з'ясуйте, якими будуть значення змінних після його завершення: a) k := 1; a := 100; while a > 10 do begin a := a/2; k := k + 1; end; b) s := 0; a := 5; while a < 100 do begin s := s + a; a := a*2; end;​

Answer 1

Ответ:

a) k=5 a=6.250

b) s=155 a=160

Объяснение:

В программы были добавлены строки для наглядной трассировки исполнения программ. На каждом шаге исполнения видно, как изменяются переменные.

Answer 2

Давайте розглянемо обидва фрагменти програми і з'ясуємо, якими будуть значення змінних після їх завершення:

a) Фрагмент першої програми:

cssCopy code
k := 1;
a := 100;
while a > 10 do
begin
  a := a/2;
  k := k + 1;
end;

Після завершення цього фрагмента програми значення змінних будуть такі:

• Після завершення циклу while, значення a буде менше або дорівнювати 10 (залежно від того, скільки разів виконувалася ітерація циклу).
• Змінна k буде містити кількість ітерацій циклу while, тобто, скільки разів виконувався цей цикл.

b) Фрагмент другої програми:

cssCopy code
s := 0;
a := 5;
while a < 100 do
begin
  s := s + a;
  a := a * 2;
end;

Після завершення цього фрагмента програми значення змінних будуть такі:

• Після завершення циклу while, значення a буде більше або дорівнювати 100 (залежно від того, скільки разів виконувалася ітерація циклу).
• Змінна s буде містити суму всіх значень a, що додавались під час ітерацій циклу.

Залежно від початкових значень змінних a та k, результати можуть відрізнятися.