Nhập vào một số nguyên dương n tìm số nguyên tố nhỏ nhất lớn hơn n

Nhập vào một số nguyên dương n tìm số nguyên tố nhỏ nhất lớn hơn n

CHUYÊN ĐỀ CHIA HẾT – SỐ NGUYÊN TỐ

Nhập vào một số nguyên dương n. Hãy in ra số nguyên tố nhỏ nhất lớn hơn n.

VD: Nhập n = 10. Kết quả in ra số 11.

Giải thuật :

- Gán i := n ;

- Thực hiện cho đến khi i là nguyên tố việc tăng i lên 1.

Program Nguyen_to;

Var n,i:integer;

Function NT(n:integer):Boolean;

Var ok: Boolean;

     i: integer;

Begin

    ok:=true;

    for i:=2 to n-1 do

     if (n mod i)= 0 then ok:=ok and false;

     if n < 2 then NT:=false else NT:=ok;

End;

Begin

   Write('Nhap n: ');Readln(n);

   i:=n;

   Repeat i:=i+1;

   Until NT(i);

   Write('So nguyen to nho nhat lon hon ',n, 'la: ',i);

   Readln

End.

 

Bạn thấy bài viết này như thế nào?: 
Average: 6 (22 votes)
Ảnh của Tommy Tran

Tommy Tran owner Express Magazine

Drupal Developer having 9+ year experience, implementation and having strong knowledge of technical specifications, workflow development. Ability to perform effectively and efficiently in team and individually. Always enthusiastic and interseted to study new technologies

  • Skype ID: tthanhthuy
  • Phone/Zalo: (+84) 944 225 212
  • WhatsApp: (+84) 944 225 212
  • Line Messenger: (+84) 944 225 212
  • Email: [email protected]
  • Telegram Messenger: https:/t.me/tommytran0401

Advertisement

 

jobsora

Dich vu khu trung tphcm

Dich vu diet chuot tphcm

Dich vu diet con trung

Quảng Cáo Bài Viết

 
Quảng cáo tìm kiếm tại VN: Sơ khai nhưng tiềm năng

Quảng cáo tìm kiếm tại VN: Sơ khai nhưng tiềm năng

Dung lượng thị trường Quảng cáo Tìm kiếm Việt Nam vào khoảng 100 triệu USD. Hiện tại, năm 2010 doanh số ngành mới chiếm khoảng 5 triệu USD. Vì vậy có thể nói tiềm năng thị trường còn rất lớn.

MacOS X 10.8 Mountain Lion

Trên Apple Store - MacBook Air được bán giá từ 679 USD

Các mẫu laptop siêu mỏng của Apple thế hệ ra mắt năm 2010 được bán dưới dạng hàng tân trang lại (refurbished) có cấu hình khá với chip Core 2 Duo, RAM tối đa 4 GB và ổ cứng tối đa 128 GB.

Facebook giới thiệu đơn vị quảng cáo di động để phát triển ứng dụng

Facebook giới thiệu đơn vị quảng cáo di động để phát triển ứng dụng

Chỉ vài tuần sau khi giới thiệu đơn vị quảng cáo di động đầu tiên, Facebook đã vận hành một đơn vị quảng cáo khác được thiết kế để giúp các nhà phát triển ứng dụng di động tự quảng bá cho mình.

Wordpress Freelancer

 

Wordpress Freelancer