Viết chương trình cho phép phân tích một số ra thừa số nguyên tố

Viết chương trình cho phép phân tích một số ra thừa số nguyên tố

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

Viết chương trình cho phép phân tích một số ra thừa số nguyên tố và ghi kết quả dưới dạng tích các lũy thừa. Ví dụ: 300 = 2^2.3.5^2

Thuật toán:

Dùng một mảng để lưu lũy thừa. Mảng này có giá trị các phần tử ban đầu đều bằng 0. Nếu n chia hết cho i thì tăng M[i] lên 1.

Khi in kiểm tra: Nếu M[i] >0 thì in i^M[i].

Cài đặt:

Program Phan_tich;

Var M: array[1..1000] of byte;

    i: byte;

    n: integer;

Begin

    For i:=1 to 1000 do M[i]:=0;

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

    i:=2;

    While n>1 do if (n mod i = 0) then begin M[i]:=M[i]+1; n:=n div i End

    else i:=i+1;

    For i:=1 to 1000 do if M[i]>0 then Begin If M[i]>1 then Write(i,'^',M[i],'.') else Write(i,'.') End;

    Readln;

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

Tommy 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

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

 
Domain Authority là gì?

Domain Authority là gì?

Domain Authority (DA) là một thước đo của SEOmoz dùng để dự đoán “sức mạnh” của website này so với website khác trên bảng xếp hạng của các SE.

Bài 3 nodejs: Callback - như một Hàm Gọi Hàm

Trong ngôn ngữ lập trình, callback (hàm gọi lại) là một hình thức của hàm gọi hàm

Những điều cần biết về Mac OS X Lion

Những điều cần biết về Mac OS X Lion

Phiên bản tiếp theo của hệ điều hành Mac OS X, phiên bản 10.7 có tên mã là Lion, đã được Apple xác nhận lên kệ ngày vào thứ Tư (20/7). Và để biết thêm về thông tin hệ điều hành này, bài viết sau sẽ giải quyết một vài thắc mắc của người dùng.

Công ty diệt chuột T&C

 

Diet con trung