4 ms·
Program test(output); var i,x:integer; y:real; begin for i:=1 to 116000 do begin x:=i; y:=(x*4)/2.71;
by test666v666 5y ago
Program test(output);
var i,x:integer;
y:real;
begin
for i:=1 to 116000 do
begin
x:=i;
y:=(x*4)/2.71;
writeln(x,y);
end;
end.