em mới học lớp 5 thôi nên không biết !

giúp với nha !!

a, Xác định bài toán:

+Input: Dãy số a1,….,an và (0,5đ)

+Output: Số lượng số hạng trong dãy số a1,….,an có giá trị bằng 9 (0,5đ)

b, Thuật toán:

Bước 1.Nhập N và dãy số a1,….,an;

Bước 2. i ←1; n ← 0; (0,25đ)

Bước 3. Nếu aithì n ←n+1;

Bước 4. i → i+1 (0,25đ)

Bước 5. Nếu i > N thì thông báo số lượng số hạng bằng k trong dãy đã cho là n và kết thúc; (0,25đ)

Bước 6. Quay lại bước 3.

Bước 1: Nhập n và nhập dãy số

Bước 2: dem←0; i←1;

Bước 3: Nếu a[i] mod 3=0 và a[i] mod 5=0 thì dem←dem+1;

i←i+1;

Bước 4: Nếu i<=n thì quay lại bước 3

Bước 5: xuất dem

Bước 6: Kết thúc

Bài 1: 

uses crt;

var a:array[1..1000000]of longint;

i,n,x:longint;

begin

clrscr;

write('Nhap n='); readln(n);

for i:=1 to n do 

begin

write('A[',i,']='); readln(a[i]);

end;

write('Nhap x='); readln(x);

for i:=1 to n do 

  if a[i]<>x then write(a[i]:4);

readln;

end.

n = int(input("Nhập n: "))

a = [ ]

for i in range(n):

     a.append(int(input(f"Nhập phần tử a[{i}]: ")))

k = int(input("Nhập k: "))

count_greater = 0

count_divisible_by_three = 0

for num in a:

     if num > k:

          count_greater += 1

     if sum(int(digit) for digit in str(num)) % 3 == 0:

          count_divisible_by_three += 1

print(f"Số lớn hơn {k}: {count_greater} số")

print(f"Số có tổng các chữ số chia hết cho 3: {count_divisible_by_three} số")