Задание

Значение двух массивов A

\[1\.\.100\]
и B
\[1\.\.100\]
задаются с помощью представленного ниже фрагемнта программы:
for n:=1 to 100 do
A
\[n\]
:= n - 10;
for n:= 1 to 100 do
B
\[n\]
:=A
\[n\]
*n
Сколько элементов массива B будет иметь положительные значения?