var a:integer; q:real;begin for a:=30 to 60 do begin q:=sqrt(a); writeln('chislo=',a,'; koren=',q:5:3); end;end.