progs/while-tests/primes.while
changeset 750 40b7efa5fbed
parent 742 155426396b5f
equal deleted inserted replaced
749:7e6bb23d415a 750:40b7efa5fbed
     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;