Program calc05;
uses crt;
var x:real;
 Begin
      clrscr;
      x:=0;
      repeat
          x:=x+0.5;
	  writeln(x:0:2);
      until (x >= 10);
 End.