Значения двух массивов A и B с индексами от 1 до 10 задаются при помощи
следующего фрагмента программы:
for i : = 1 to 10 do
A[i] : = i;
for i : = 1 to 10 do
B[i] : = A[i]-5;
Сколько положительных значений будет в массиве B?