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.
60 điểm
NguyenChiHieu
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
Trả lời
Tổng hợp câu trả lời (1)
NguyenHieu
12:11:02 24-Nov-2021
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.
Câu hỏi hay nhất cùng chủ đề
- Phát biểu nào sau đây có thể lấy làm biểu thức điều kiện trong cấu trúc rẽ nhánh ? A. A + B B. A > B C. N mod 100 D. “A nho hon B”
- Để đưa ra màn hình giá trị của biến a kiểu nguyên và biến b kiểu thực ta dùng lệnh A. Write(a:8:3, b:8); B. Readln(a,b); C. Writeln(a:8, b:8:3); D. Writeln(a:8:3, b:8:3);
- Tìm số lớn thứ nhì trong n số được nhập từ bàn phím.
- Em hãy hoàn thiện chương trình sau để tính tổng S =1+1/8+1/27+...1/n^3
- Mạng ARPANET ra đời vào năm nào? Select one: A. 1965 B. 1970 C. 1971 D. 1969
CÔNG TY TNHH TOP EDU
Số giấy chứng nhận đăng kí kinh doanh: 0109850622, cấp ngày 09/11/2021, nơi cấp Sở Kế Hoạch và Đầu tư Thành phố Hà Nội
Hãy giúp mọi người biết câu trả lời này thế nào?