Значения элементов двух массивов A[1..100] и B[1..100] задаются с помощью следующего фрагмента программы:

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

Сколько элементов массива B будут иметь положительные значения?