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