Задание

Значения двух одномерных масствов A и B, размером 100 элементов каждый, задаются с помощью данного фрагмента программы:

for I:=1 to 100 do

begin

A[I]:=50 - I

end;

for I:=1 to 100 do

begin

B[I]:=A[I] + 49

end;

Сколько элементов массива B будут иметь отрицательное значение?

(Введите число)

ОтветВведите число