Сформировать массивы только из отрицательных элементов исходных массивов

xana

даны массивы L(10),K(7),M(8),N(5).Сформировать массивы L1,M1,K1,N1,элементами которых являются только отрицательные элементы массивов L,M,N,K соответственно.Формирование результирующего массива,состоящего из отрицательных элементов заданного массива,оформить в виде подпрограммы
4 ответа

xana

{Сформировать массивы L1,M1,K1,N1,элементами которых 
являются только отрицательные элементы массивов L,M,N,K}
var L1:array[1..10] of real;
i:integer;
begin
for i:=1 to 10 do
begin
L1[i]:= random()*2-10;
writeln(L1[i]:4);
end;
end.
такой вариант!


xana

all_angarsk, условие прочтите внимательно


xana

all_angarsk, условие прочтите внимательно
Нужно передирать массив и выбрать отрицательные..... это я понял но я показал начало и жду его действий.


xana

О каком начале речь, если по условию очевидно, что в исходных массивах есть не только отрицательные числа