GEMini Atari/GEMini_Atari_CD-ROM_Walnut_Creek_December_1993.iso/files/language/isetl/primes.t

Text File | 1987-08-20 | 131 b | 8 lines

program primes;
    print "Enter N:";
    read N;
    print [x: x in [2..N] | forall y in [2..x-1] | x mod y /= 0];
    end;

100;