program tong_chiahet_3_7;
uses crt;
var n,i,t:integer;
begin
clrscr;
write('Nhap n: '); readln(n);
t:=0;
for i:=1 to n do
if (i mod 3=0) or (i mod 7=0) then t:=t+i;
write('Tong la: ',t);
readln;
end.
program tong;
var n,i,T: integer;
Begin
if (i mod 3=0) or (i mod 7=0) then T:=T+i;
write('Tong cac so chia het cho 3 hoac chia het cho 7 = ',T);
readln
End.
nghệ thuận chạm trổ trên gỗ , đá ... gọi là ...... khắc
Tytytytytytytytytytytyytytytytyt
câu 1: trình bày những chuyển biến về văn hóa xã hội nước ta thời kỳ bắc thuộc
Oxi đi vào trong cơ thể để làm gì
Hãy nói về đôi nét về nguyễn hoàng nguyên - rosie nguyễn - rác giả tuổi trẻ đáng giá bnh
Vẽ avt cuẢ TOY và viết chữ @rubymisa
hệ hô hấp gồm những cơ quan nào? Kể tên về 1 số bệnh về hô hấp
1. Biết 2/3 của một số là 40 . Tìm 7/10 của số đó 2. Tính giá trị của biểu thức 3 .bài giải
Mọi người có thể giúp tớ giải 3 câu hỏi này được không
Giúp mik câu 9, 10 với ạ mai mình thi r ạ. Mong mn giúp đỡ ạ. Cảm ơn ạ
Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến