Dựa vào thuật toán viết chương trình Pascal

----- Nội dung dịch tự động từ ảnh -----
Thuật toán :
B1: Nhập số tự nhiên N từ bàn
phím.
B2: Nếu N$1 thông báo N không
phải là số nguyên tố, rồi chuyễn
đến B4.
B3: Nếu N>1;
3.1. I–2;
3.2. trong khi N mod i<>0 còn
đúng thì i i+1;
3.3. Nếu i = N thì thông báo N là
số nguyên tố, rồi chuyển đến B4.
Ngược lại thông báo N không phải
là số nguyên tỐ.
B4: Kết thúc thuật toán
Dựa vào thuật toán viết chương trình Pascal
-HÉT
---