Информатика, опубликовано 2018-08-22 22:53:54 by Гость

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

Ответ оставил Гость

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] writeln;
end.

Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.

Форма вопроса доступна на полной версии этой страницы.