Pascal | Kiểm tra số N có phải là số nguyên tố hay không

Pascal | Kiểm tra số N có phải là số nguyên tố hay không

Kiểm tra số N có phải là số nguyên tố hay không.

Ví dụ:             N = 19            Kết quả là: 19 la so nguyen to

N = 33            Kết quả là: 33 khong phai la so nguyen to

Yêu cầu: Input:   N, là số tự nhiên bất kỳ.

Output: Trả lời “N la so nguyen to”

      hoặc “N khong phai la so nguyen to” tùy theo N.

Lưu ý: Số nguyên tố là số chỉ có thể chia hết cho 1 và chính nó ( N ).

Ngược lại, N là không phải là số nguyên ==> N chia hết cho một số trong khoảng từ 2 đến (N-1).

Hướng dẫn:

Bài toán được thực hiện qua 3 bước cụ thể như sau:

-         Thông báo nhập liệu, và nhập dữ liệu vào cho N
-         Tiến hành kiểm tra N có phải là số nguyên tố hay không:
-         Xuất câu trả lời “N la so nguyen to” hoặc “N khong phai la so nguyen to” tùy theo giá trị của biến

Chương trình:

Program SNT;
Uses crt;
Var n , i :Integer;                                    // Khai bao bien su dung
BEGIN
            Write(‘Nhap vao mot so:’);        // Thong bao nhap lieu
            Readln(n);                                   // Nhap gtri N, (voi &N la lay d/c bien N)
            i := round( sqrt(n) );
            If( n mod i <> 0) then                 // Xuat cau tra loi cuoi cung
                        Writeln(‘ N la so nguyen to’)
            Else
                        Writeln(‘ N khong la so nguyen to’);
            Readln;
END.
Bạn thấy bài viết này như thế nào?: 
Average: 6.3 (435 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: asaleotestf@gmail.com
  • Telegram Messenger: https:/t.me/tommytran0401

Quảng cáo việc làm

 

Thích hợp các bạn nữ mảng thợ may làm việc tại nước NGA

Đơn hàng Tuyển dụng 100 Thợ may đi Nga(đợt 1 tháng 3.2021, đợt 2 tháng 5.2021). Lương thực lãnh 800 USD, bao ăn ở, vé máy bay và visa, phí xuất cảnh(1800 USD)trả khi đi làm có lương. Bạn có thể liên hệ CÔNG TY qua Phone/Zalo: (+84) 944 225 212. Công ty sẽ tư vấn cho bạn.

Xem chi tiết: >>> https://bit.ly/3o9NOfR

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

 
Tính năng Exposed filters ra Block trong Views 3

Tính năng Exposed filters ra Block trong Views 3

Here is a quick how-to on how to have your exposed View 3 filters as a block in Drupal 7.

Sending a Drupal Site using HTTrack and GitHub Pages.

Sending a Drupal Site using HTTrack and GitHub Pages.

Ideas for how to gracefully retire (or semi-retire) a Drupal site using HTTrack and GitHub Pages.

Groupon Trung Quốc bồi thường vì bán đồng hồ rởm

Groupon Trung Quốc bồi thường vì bán đồng hồ rởm

Ngày 8/11, nhà cung cấp dịch vụ khuyến mãi trực tuyến nổi tiếng thế giới Groupon đã lên tiếng xin lỗi và đề nghị hoàn trả tiền cho những khách hàng mua phải đồng hồ đeo tay rởm từ Groupon Trung Quốc.