Question

Объясните пожалуйста как решить Чему будет равна переменная sum после выполнения фрагмента программы: i:=15; sum:=0; While i>5 do begin sum:=sum+i/5; i:=i-5 end;

Answer 1

Давайте разберемся с фрагментом программы пошагово.

i := 15;
sum := 0;
while i > 5 do
begin
  sum := sum + i / 5;
  i := i - 5;
end;

1. Инициализация переменных: - `i` устанавливается в 15. - `sum` устанавливается в 0.

2. Цикл while: - Цикл будет выполняться, пока `i` больше 5.

3. Тело цикла: - На каждом шаге цикла выполняются следующие действия: - `sum` увеличивается на значение `i / 5`. - `i` уменьшается на 5.

4. Шаги цикла: - Первая итерация: `sum = 0 + 15 / 5 = 3`, `i = 15 - 5 = 10`. - Вторая итерация: `sum = 3 + 10 / 5 = 5`, `i = 10 - 5 = 5`.

5. Выход из цикла: - После второй итерации значение `i` становится равным 5, что не удовлетворяет условию `i > 5`, и цикл завершается.

Таким образом, после выполнения данного фрагмента программы переменная `sum` будет равна 5.