Kiểm tra xem một số có phải là sô nguyên tố hay không
INPUT
Một số n (n $<=$ $10^9$)
OUTPUT
In "YES" nếu là số nguyên tố, ngược lại in ra "NO".

Thuật toán : Loại bỏ những số là hợp số.
Dùng 1 mảng $F$ kiểu boolean với $F\left [ 1 \right ]=false$ 
Từ $F\left [ i \right ]$ trở đi nếu $F\left [ i \right ]=true$ thì  $F\left [ i*m \right ]=false$

Code chính:

Code:


f[1]:=false;
for i:=2 to m do
    if f[i] then
      for j:=i to (m div i) do
        if j*i<=m then f[i*j]:=false;
if f[n] then write('YES') else write('NO');