var x:word;begin for x:=0to 30do writeln("x = ",x/10:1:1,", y = ",(26.5241/24)pow x:1:6)end.