Quảng cáo
2 câu trả lời 327
porgram tong;
uses crt;
var n,i,T: integer;
Begin
write(‘Nhap n: ‘); readln(n);
write(‘Cac so chia het cho 5: ‘);
for i:=1 to n do
if i mod 5=0 then
begin
T:=T+i;
write(i,’ ‘);
end;
write(‘T = ‘,T);
readln
End.
porgram tong;
uses crt;
var n,i,T: integer;
Begin
write(‘Nhap n: ‘); readln(n);
write(‘Cac so chia het cho 5: ‘);
for i:=1 to n do
if i mod 5=0 then
begin
T:=T+i;
write(i,’ ‘);
end;
write(‘T = ‘,T);
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 VIETJACK
Đã trả lời bởi chuyên gia
44988 -
Hỏi từ APP VIETJACK
Đã trả lời bởi chuyên gia
34460
-
Đã trả lời bởi chuyên gia
30241
-
Hỏi từ APP VIETJACK27169
-
Hỏi từ APP VIETJACK
Đã trả lời bởi chuyên gia
21825
-
보고 싶어요
2510 điểm
-
🐟祖尼⚡
1195 điểm
-
nhỏ na
1100 điểm
-
`color{blue}text{HuyTùng☢`
1010 điểm
-
언니, 사랑해😗
965 điểm
-
౨ৎ𝘉ắ𝘱ت𝘭𝘶ộ𝘤تđê⋅˚₊‧ ଳ⋆.࿔*:･🌽
630 điểm
-
Ben 10K
595 điểm
-
𝘳𝘺𝘯.𝘭𝘦𝘦ッ
545 điểm
-
devestro
520 điểm
-
Kiều Anh 450 điểm
-
pp mn, từ nay off
400 điểm
-
jgdmaX
345 điểm
-
너 없는 파리
340 điểm
-
Vợ Jungwon Bồ Jay
265 điểm
-
🌸˚˖𓍢ִ໋🌷͙֒✧ᕼàᑎᕼ.丅ᖇᗩᑎǤ.丅ᖇᎥ.丅ᕼứᑕ🩷˚⋆
245 điểm
Rút gọn
Bài viết mới nhất Lớp 8
-
3 năm trước8254
-
3 năm trước7767
-
3 năm trước6590
-
3 năm trước6481
-
3 năm trước6307
