Quảng cáo
2 câu trả lời 379
uses crt;
var i1,i2,d1,d2: integer;
begin
clrscr;
d1:=0; d2:=0;
for i:=1 to 6 do if 6 mod i = 0 then d1:=d1+1;
if d1=2 then write('6 la so nguyen to') else write('6 khong la so nguyen to');
for i:=1 to 7 do if 7 mod i = 0 then d2:=d2+1;
if d2=2 then write('7 la so nguyen to') else write('7 khong la so nguyen to');
readln
end.
uses crt;
var i1,i2,d1,d2: integer;
begin
clrscr;
d1:=0; d2:=0;
for i:=1 to 6 do if 6 mod i = 0 then d1:=d1+1;
if d1=2 then write('6 la so nguyen to') else write('6 khong la so nguyen to');
for i:=1 to 7 do if 7 mod i = 0 then d2:=d2+1;
if d2=2 then write('7 la so nguyen to') else write('7 khong la so nguyen to');
readln
end.
Quảng cáo
Bạn hỏi - Chuyên gia trả lời
Bạn cần hỏi gì?
Câu hỏi hot cùng chủ đề
-
Hỏi từ APP VIETJACK45552
-
Hỏi từ APP VIETJACK28478
-
Đã trả lời bởi chuyên gia
28474
-
Huy giữ vững top 1 ko cho ai cướp (╬ ಠ益ಠ) * (¬_¬)*
3230 điểm
-
ĐAG NHỚ MỘT NGƯỜI | K12 ♡ ... ? 1180 điểm
-
VĨNH DẠ( ˘ ³˘)👉🏿🧠
825 điểm
-
TÊN SAO CHO HAY ??
765 điểm
-
✎𝓲𝔃𝓵𝔂౨ৎ
565 điểm
-
Đỗ Quyên
240 điểm
-
♡ 𝓘 𝓵𝓸𝓿𝓮 𝔂𝓸𝓾 ♡
200 điểm
-
Iloveeggs
190 điểm
-
ko hiểu
190 điểm
-
Tôi rất mê cờ vua 185 điểm
-
Nhàm Chán???? 175 điểm
-
♰イ̴ケ̴メ̴ン̴の̴ロ̴ン̴♰
175 điểm
-
Minh nè:))
155 điểm
-
gia nhập vietjack sau 2 năm
135 điểm
Rút gọn
Bài viết mới nhất Lớp 8
-
4 năm trước11731
-
4 năm trước11112
-
4 năm trước9777
-
4 năm trước10071
-
4 năm trước9516
