var a: integer;
x:real;
begin
a:=5;
x:=0.75;
while x <= 1.5 do
writeln('x = ',x,' y = ',a*sqrt(x):0:3);
x:=x+0.5;
end
end.
var a: integer;
x:real;
begin
a:=5;
x:=0.75;
while x <= 1.5 do
begin
writeln('x = ',x,' y = ',a*sqrt(x):0:3);
x:=x+0.5;
end
end.