Разработать схему алгоритма, который вводит массив из n целых чисел и выводит номера отрицательных элементов и сами эти элементы. протестировать алгоритм для следующих массивов: а) 3 5 -2 3 -2 0 -6 -8 1 б) -1 -2 -3 -4 0 -1 2 3 написать
программу на языке паскаль.

Const   nn = 50; var   a,b,nb: array[1..nn] of integer;   i,n,j: integer; begin   write('введите количество элементов в массиве (n< 51): ');   read(n);   writeln('вводите элементы массива');   j: =0;   for i: =1 to n do   begin       read(a[i]);       if a[i]< 0 then begin inc(j); b[j]: =a[i]; nb[j]: =i end   end;   if j> 0 then begin       write('отрицательные элементы: ');       for i: =1 to j do write(b[i],' ');       writeln;       write('индексы отрицательных элементов в массиве: ');       for i: =1 to j do write(nb[i]: 3);       writeln   end end. результаты тестирования: введите количество элементов в массиве (n< 51): 9 вводите элементы массива 3 5 -2 3 -2 0 -6 -8 1 отрицательные элементы: -2 -2 -6 -8 индексы отрицательных элементов в массиве:   3  5  7  8 введите количество элементов в массиве (n< 51): 8 вводите элементы массива -1 -2 -3 -4 0 -1 2 3 отрицательные элементы: -1 -2 -3 -4 -1 индексы отрицательных элементов в массиве: 1  2  3  4  6

2,6,5,3,1,4,7 вроде так

Это свитки которые люди раньше писали и эти свитки переходили с поколения в поколения

I = i * k = 16 * 2048 / 8 = 4096 байт = 4 кб