Chương trình đơn giản

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Phương Khánh

Cho số tự nhiên n. Hãy tính tổng các ước số nguyên tố của n!

Nguyễn Lê Phước Thịnh
5 tháng 2 2021 lúc 20:24

uses crt;

var n,i,s,kt,j,t:longint;

begin

clrscr;

write('Nhap n='); readln(n);

s:=1;

for i:=1 to n do

  s:=s*i;

t:=0;

for i:=2 to s do 

  if s mod i=0 then

begin

kt:=0;

for j:=2 to i-1 do 

  if i mod j=0 then kt:=1;

if kt=0 then t:=t+i;

end;

writeln('Tong cac uoc nguyen to cua n,'! la: ',t);

readln;

end.

Tuấn Nguyễn
6 tháng 2 2021 lúc 10:26

ta dinh nghia nhu sau

n!=n*(n-1)*(n-2)*...*1;

vs 4!=1*2*3*4;

vi the ban chi can tinh tong cac so nguyen to tu 1 den n thoi

ko can tinh n! lam j cho mat tg ,do phuc  tap la O(n) nhe

 


Các câu hỏi tương tự
Nguyễn Thị Tươi
Xem chi tiết
Hoàng lĩnh
Xem chi tiết
Vân Ngô
Xem chi tiết
Le Trung Hieu
Xem chi tiết
Trần Vi Nam Khánh
Xem chi tiết
Thái Bảo
Xem chi tiết
Hứa Tiến Mạnh
Xem chi tiết
Lê Thị Bảo Trâm
Xem chi tiết
Hà Phương
Xem chi tiết