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

В цикл while переменная i войдет со значением 15 и после первого прохода значение переменных будет следующим:

sum = 0 + i / 5 = 15 / 5 = 3;

i = 10.

i > 5, поэтому возможно повторное выполнение цикла:

sum = 3 + 10 / 5 = 5;

i = 10 - 5 = 5.

После того, как значение i стало равным  5 (уже не больше 5) цикл выполняться не будет, поэтому значение sum больше меняться не будет.

Ответ: sum = 5.