Uses crt;Var N,i,s: longint;Begin Clrscr; Write('Nhap n: '); Readln(n); s:=0; For i:=1 to n div 2 do If (n mod i=0) and (i mod 2=0) then s:=s+i; Write('Tong cac uoc so chan cua ',n,' la: ',s); ReadlnEnd.
Input: n
Thuật toán:
- Cho i chạy từ 1 đến n nếu n chia hết cho i và i chia hết cho hai thì cộng i vào biến tổng
Output: xuất biến tổng
hiện nay châu phi gặp phải những khó khăn gì trong giải quyết việc làm? Biện pháp khắc phục
- nêu các bộ phận của tế bào? Trong các bộ phận đó, bộ phận nào quan trọng nhất?
Giúp mk câu 4 với ạ mk đang cần gấp ạ
Một trại chăn nuôi 3580 gà và vịt. Bán 150 gà và mua 240 vịt. Gà ít vịt 470 còn. Hỏi lúc trước có bao nhiêu con vịt
Ai làm đc hết hoặc từng bài 1 mình tích 5s vote hay nhất
số trung bình cộng của hai số bằng 9 biết một trong hai số đó bằng 12 tìm số kia bài này làm sao vậy
Nêu ba hàng rào bảo vệ cở thể của bạch cầu
Giúp mình bài 8 vs mk sẽ tích ạ
hấp thụ hết 2.688 lít co2 vào 50 gam dung dịch MOH ( M là kim loại kiềm) thu dung dịch X chứa 10,74 gam hỗn hợp 2 muối. Tính nồng độ % của dung dịch MOH
nếu khối lượng của 2 vật tăng gấp đôi để lực hấp dẫn giữa chúng không đổi thì khoảng cách giữa chung là bao nhiêu
Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến
