ПОМОГИТЕ, ПОЖАЛУЙСТА!!!! Дан целочисленный массив из 30 элементов. Элементы массива могут...

Question

ПОМОГИТЕ, ПОЖАЛУЙСТА!!!!
Дан целочисленный массив из 30 элементов. Элементы массива могут принимать целые значения от 0 до 1000. Опишите на одном из языков программирования алгоритм, позволяющий найти и вывести количество элементов массива, десятичная запись которых содержит ровно 2 цифры, причем хотя бы одна из этих цифр – цифра 9.
const N=30;
Var a:array [1..N] of integer;
i, j, k: integer;
begin
for i:=1 to N do
readln(a[i]);
…
end.
нужно заполнить пропуск в программе

Answer 1

Const N=30; 
Var a:array [1..N] of integer; 
i, j, k: integer; 
begin 
for i:=1 to N do
readln(a[i]); 
k:=0;
for i:=1 to N do
 if (a[i]>9)and(a[i]<100)and((a[i] mod 10=9)or(a[i] div 10=9))<br>  then k:=k+1;
writeln('k = ',k);
end.

Пример (для N=10):
350
79
108
91
56
71
30
39
257
39
k = 4

Answer 2

from random import randint
N = 30
A = [randint (0 , 1001) for i in range(30)]
print(A)
for k in range(30):
    if len (str(A[k])) == 2:
        a = A[k] % 10
        b = A[k] // 10
        if a == 9 or b == 9:
            print (A[k])