progs/while-tests/primes.while
changeset 750 e93a9e74ca8e
parent 742 b5b5583a3a08
equal deleted inserted replaced
749:bb2335a5ca58 750:e93a9e74ca8e
     1 // prints out prime numbers from
     1 // prints out prime numbers from 2 to 100 
     2 // 2 to 100 (end)
       
     3 
     2 
     4 end := 100;
     3 end := 100;
     5 n := 2;
     4 n := 2;
     6 while (n < end) do {
     5 while (n < end) do {
     7   f := 2;
     6   f := 2;