TNhi

viết chương trình thông báo ra màn hình các số có 3 ước số trong khoảng từ 1 đến n với n nhập từ bàn phím

Minh Lệ
15 tháng 4 2022 lúc 18:48

Program HOC24;

var i,j,n,d: integer;

begin

write('Nhap N: '); readln(n);

d:=0;

for i:=1 to n do

for j:=1 to i do if i mod j=0 then d:=d+1;

write('Ket qua : ',d);

readln

end.

Bình luận (0)

Các câu hỏi tương tự
Nguyễn Thanh Anh
Xem chi tiết
Nguyễn Như
Xem chi tiết
Nguyễn Cảnh Hùng
Xem chi tiết
Bùi Ngọc Khánh Huyền
Xem chi tiết
Trần My
Xem chi tiết
Phong Nguyễn
Xem chi tiết
T Đạt
Xem chi tiết
28 Nhật Quý
Xem chi tiết
phạm hải nam
Xem chi tiết