Вопрос по информатике:

1)Сколько раз будет исполнен цикл в фрагменте программы:
p:=25; k:=0;
repeat
p:=p*0.2;
k:=k+1;
until p<0.2;
2)Чему равна сумма а[1] и а[4] элементов массива, сформированного следующим образом:
for i:=1 to 5 do a[i]:=i*i+12;
В ответе необходима сумма двух элементов массива.