Smallest square that begins with n: Difference between revisions

m
→‎{{header|ALGOL W}}: type in comment...
(Added Algol W)
m (→‎{{header|ALGOL W}}: type in comment...)
Line 21:
while v > 0 do begin
if v <= MAX_NUMBER and lowest( v ) = 0 then begin
% found a suaresquare that starts with a number in the range %
lowest( v ) := n2;
numberFound := numberFOund + 1
3,049

edits