Nhập một số nguyên N từ bàn phím kiểm tra xem N có là số nguyên tố không
2 câu trả lời
Bài làm :
program so nguyen to;
uses crt;
var kt,n,i:integer;
begin
clrscr;
write('Nhap n='); readln(n);
kt:=0;
for i:=2 to n-1 do
if n mod i=0 then kt:=1;
if (kt=0) and (n>1) then writeln(n,' la so nguyen to')
else writeln(n,' khong la so nguyen to');
readln;
end.
xin hay nhất ạ
Thuật toán
Dựa vào định nghĩa của số nguyên tố chúng ta sẽ có cách giải như sau:
Bước 1: Nhập vào n.
Bước 2: Kiểm tra nếu n < 2 thì kết luận n không phải là số nguyên tố
Bước 3: Lặp từ 2 tới (n-1),
Nếu trong khoảng này tồn tại số mà n chia hết thì kết luận n không phải là số nguyên tố, ngược lại n là số nguyên tố.
Câu hỏi trong lớp
Xem thêm