Cho dãy A gồm N số nguyên dương,(N<=100, Ai<=10000|i∈[1..n]). Viết chương trình nhập dãy A và đếm số lượng các số là bội của 3 trong dãy. Hãy hoàn thiện bằng cách điền vào vị trí các chỗ được đánh số từ 9 đến 16 Program dem_boi; Var A : array[1..100] of (9); N, i : byte; Sl: (10); Begin Write(‘Nhap so luong phan tu cua day:’); Readln(11); For i:=1 to N do Begin Write(‘A[’ , i , ‘]=’); Readln(12); End; (13); For i:=(14) to N do If (15) then Sl:=Sl+(16); Writeln(‘So luong phan tu la boi cua 3 la:’, Sl); Readln End.
2 câu trả lời
(9)(10) integer
(11) n
(12) a[i]
(13)sl:=0;
(14) 1
(15) a[i] mod 3=0
(16) 1
Câu hỏi trong lớp
Xem thêm