Есть ответ 👍

Введите массив из 10 чисел и выведите на экран только отрицательные значения этого массива. напишите,,программу.

226
394
Посмотреть ответы 2

Ответы на вопрос:


var

  m : array [1..10] of integer;

  i : integer;

begin

  writeln('введите массив: ');

 

  for i : = 1 to 10 do

  begin

    write('m[', i, '] = '); readln(m[i]);

  end;

 

  writeln('отрицательные: ');

 

  for i : = 1 to 10 do

    if m[i] < 0 then writeln(m[i]);

 

end.


у меня где сам не

Популярно: Информатика