perm filename LOOP.F4[NET,GUE] blob
sn#003922
filedate 1972-11-03 generic text, type T, neo UTF8
00100 DO 100 N=1,100 00200 M=N**N 00300 I=(M)**(1/N) 00400 100 CONTINUE 00500 STOP 00600 END