var x: real;
begin writeln('x', #9, 'y'); x := 4; while(x <= 10) do begin writeln(x:3:1, #9, x * x:4:2); x := x + 0.1; endend.