Question

Чему будет равна переменная sum после выполнения фрагмента программы: i:=15; sum:=0; While i>5 do begin sum:=sum+i/5; i:=i-5 end[/tex]

Answer 1

Пяти:)

{ Без расчётов выкладывать нельзя поэтому вот они }
begin
   var i: integer := 15;
   var sum: real := 0;
   while i > 5 do
   begin
    sum := sum + i / 5;
     i := i - 5
  end;
  writeln(sum);
end.

Answer 2

Переменная sum будет равна 20 после выполнения фрагмента программы.

Давайте разберем по шагам:

1. i присваивается значение 15. 2. sum присваивается значение 0. 3. Пока i больше 5, выполняется следующий блок кода: - sum увеличивается на i/5 (15/5 = 3). - i уменьшается на 5 (15-5 = 10). 4. После этого цикл повторяется: - sum увеличивается на i/5 (10/5 = 2). - i уменьшается на 5 (10-5 = 5). 5. Когда i становится равным 5, условие i>5 не выполняется, и цикл завершается.

Таким образом, переменная sum будет равна 3 + 2 + 1 + 0 + 0 = 6.