Begin
Integer i;
For i:=1 step 1 until 50 do OutFloat(SQRT(i));
End;