Что выведет следующая программа:

var R: real;
Begin
R := 1;
Repeat
write\(R,' '\);
R := R / 2;
Until R <= 0.3;
write\('\#'\);
End.

• Ничего не выведет
• Ошибку
• 1 0.5 #
• 1 0.5
• 1 #
• #