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

9: longint

10: longint

11: n

12: a[i]

13: si:=0

14: 1

15: a[i] mod 3=0

Câu hỏi trong lớp Xem thêm