1. Сколько раз исполнится цикл:i:=6; while i<18 do i:=i+3?
2. Чему будет равна переменная sum после выполнения фрагмента программы:
sum:=0;
for i:=7 to 9 do
sum:=sum+i;