PROMAL is a historical programming language created in 1986.

33Years Old 1,020Users 0Jobs

Example code from Wikipedia:

PROGRAM SIEVE
   ; Sieve of Eratosthenes Benchmark
   ; test (BYTE magazine)
   ; 10 iterations, 1800 element array.
 INCLUDE LIBRARY
 CON SIZE=1800
 WORD I
 WORD J
 WORD PRIME
 WORD K
 WORD COUNT
 BYTE FLAGS[SIZE]
 
 BEGIN
 OUTPUT "10 ITERATIONS"
 FOR J= 1 TO 10
   COUNT=0
   FILL FLAGS, SIZE, TRUE
   FOR I= 0 TO SIZE
     IF FLAGS[I]
       PRIME=I+I+3
       K=I+PRIME
       WHILE K <= SIZE
         FLAGS[K]=FALSE
         K=K+PRIME
       COUNT=COUNT+1
 OUTPUT "#C#I PRIMES", COUNT
 END
Edit

Last updated February 11th, 2019