Дан вектор N - элементов

Вывести на экран отрицательные числа из этого вектора

Question

Информатика

Генуся

18 августа, 08:51

Дан вектор N - элементов

Вывести на экран отрицательные числа из этого вектора

+1

Ответы (1)

Знаете ответ на вопрос?

Леонтьюшка · Answer 1

Const n=10;

var x : array[1 ... n] of integer;

i : integer;

begin

Randomize;

writeln ('Массив:') ;

for i:=1 to n do

begin

x[i]:=random (21) - 10;

write (x[i],' ') ;

end;

writeln;

writeln ('Отрицательные элементы массива:') ;

for i:=1 to n do

if x[i]<0 then write (x[i],' ') ;

writeln;

end.

Дан вектор N - элементовВывести на экран отрицательные числа из этого вектора

Дан вектор N - элементов

Вывести на экран отрицательные числа из этого вектора