var i:integer; begin i:=900; repeat Writeln(sqrt(i)); i:=i-7; until i<0; end.