4 ms·
It’s been 35+ years for me but basically: Alternate version using while: program hnscratch; var i: integer; x: real; y: real; i := 0; begin
by epc 5y ago
It’s been 35+ years for me but basically:
Alternate version using while:
program hnscratch;
var i: integer;
x: real;
y: real;
i := 0;
begin;
while i <116000 do;
begin;
x := i;
y := (x*4) / 2.71;
writeln(x,y);
end;
end.
- camillomiller 5y agoThanks!