KT Số nguyên tố

Tác giả:

Dạng bài

Điểm: 900 (p) Thời gian: 1.0s Bộ nhớ: 1023M Input: bàn phím Output: màn hình

Trong ngày thực tập đầu tiên, thầy Hải 'dới' có một câu đố nho nhỏ cho các học sinh của mình. Cho một số nguyên \(n\), hãy kiểm tra \(n\) có phải là số nguyên tố hay không?

Số nguyên tố là số tự nhiên lớn hơn 1 chỉ có hai ước số dương phân biệt là 1 và chính nó.

Input:

Gồm một dòng duy nhất là số nguyên \(n (|n| \le 10^{12})\)

Output:

In ra YES nếu \(n\) là số nguyên tố. Ngược lại in ra NO.

Example

Test 1

Input

Output

NO

Test 1

Input

Output

YES

Bình luận

0

rock 6:52 p.m. 21 Tháng 10, 2024

code pascal
VAr n:int64;
i:longint;
kt,k:boolean;
begin
readln(n);
i:=2;
k:=false;
While (i<=trunc(sqrt(n))) and (k=false) do
begin
if n mod i=0 then k:=true;
inc(i);
end;
If (k=false) and (n>1) then Writeln('YES') else Writeln('NO');
readln
end.

20 bình luận nữa