BH

2. Nhập vào 2 số m,n với 0<n<m<10^9. Hãy in ra màn hình các số nguyên tố
có trong khoảng (n,m)? Cho biết số nhỏ nhất trong các số vừa nhập? thừa,
số chữ số, tổng các chữ số của tổng n giai thừa?

NT
6 tháng 8 2023 lúc 19:54

uses crt;

var i,n,m,j,kt:integer;

begin

clrscr;

readln(n,m);

for i:=n to m do

begin

kt:=0;

if (i>2) then begin

for j:=2 to trunc(sqrt(i)) do

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

if kt=0 then write(i:4);

end;

readln;

end.

Bình luận (0)

Các câu hỏi tương tự
TD
Xem chi tiết
H24
Xem chi tiết
DV
Xem chi tiết
H24
Xem chi tiết
NL
Xem chi tiết
HP
Xem chi tiết
VB
Xem chi tiết
H24
Xem chi tiết
CK
Xem chi tiết