Сколько раз будет выполняться цикл For i:=4 to 4 do…;