Số nguyên tố là một số nguyên dương chỉ chia hết cho chính nó

Kiểm tra bằng cách chia số đó cho từng số từ 2 đến số đó, nếu chia ko hết thì tăng thêm một đến khi nào số cần ktra = số i(số chạy từ 1 đến số ktra); Nếu số kta bằng số i thì số ktra là số nguyên tố

Số 1 ko phải số nguyên tố số nguyên tố phải lớn hơn 1

CT

uses crt;

var n,i:integer;

begin

clrscr;

write('nhap so n '); readln(n);

i:=2;

while n mod i <>0 do i:=i+1;

if n=i then writeln(N,'la so nguyen to') else

writeln(N,'khong phai la so nguyen to');

readln

end.

* trả lời câu hỏi:

Số nguyên tố là một số nguyên dương có 2 ước phân biệt là 1 và chính nó

Kiểm tra bằng cách chia số đó cho từng số từ 2 đến số đó nếu không chia hết thì tăng thêm 1 đơn vị cho đến số cần kiểm tra, nếu số đó chia hết cho 1 giá trị trong khoảng từ 2 đến số đó thì kết luận không phải là số nguyên tố, ngược lại thì là số nguyên tố

Số 1 không phải số nguyên tố vì số nguyên tố là số có hai ước là 1 và chính nó, trong khi 1 chỉ có 1 ước.

* chương trình:

uses crt;
var n,i:integer;
begin
clrscr;
write('nhap n: '); readln(n);
if n<2 then write(n,' khong phai la so nguyen to')
else
begin
i:=2;
while n mod i <> 0 do i:=i+1;
if n=i then writeln(n,' la so nguyen to') 
else
writeln(n,' khong phai la so nguyen to');
end;
readln;
end.