All pastes #619616 Raw Edit

nada

public text v1 · immutable
·published 2007-07-14 22:02 UTC
rendered paste body
Program calc05;
uses crt;
var x:real;
 Begin
      clrscr;
      x:=0;
      repeat
          x:=x+0.5;
	  writeln(x:0:2);
      until (x >= 10);
 End.