Написать программу на паскале две двумерный массив .удалить столбец в котором кол-во положительных элементов равно кол-ву отрицательных.

// PascalABC.NET 3.1, сборка 1219 от 16.04.2016
type
  Matrix=array[,] of integer;

procedure MatPrint(a:Matrix);
begin
  var m:=Length(a,1)-1;
  for var i:=0 to Length(a,0)-1 do begin
    for var j:=0 to m do Write(a[i,j]:4);
    Writeln
    end
end;

function IsEqual(a:Matrix; col:integer):boolean;
begin
  var s:=sign(a[0,col]);
  for var i:=1 to Length(a,0)-1 do s+=sign(a[i,col]);
  if (s=0) then Result:=(a[0,col]<>0)
  else Result:=false
end;

procedure DeleteCol(var a:Matrix; col:integer);
begin
  var n:=Length(a,0)-1;
  var m:=Length(a,1)-1;
  for var j:=col+1 to Length(a,1)-1 do
    for var i:=0 to n do a[i,j-1]:=a[i,j];
  SetLength(a,n+1,m)
end;

begin
  var n:=ReadInteger('Строк:');
  var m:=ReadInteger('Столбцов:');
  var a:=MatrixRandom(n,m,-99,99);
  Writeln('Исходная матрица');
  MatPrint(a);
  for var j:=Length(a,1)-1 downto 0 do
    if IsEqual(a,j) then DeleteCol(a,j);
  Writeln('Результирующая матрица');
  MatPrint(a);  
end.

Тестовое решение
Строк: 8
Столбцов: 10
Исходная матрица
  -3 -82 -25 -22  65   1  79 -67 -64 -82
  17  36  48 -32  51  11  43   9 -35   4
 -10  -5  80  82 -24  66 -12 -58  50 -94
  52  70  53  85 -32 -59  46  57 -84 -44
  81  71 -55  37  46 -15 -61  25  22  -7
 -49  98 -42 -18 -44 -97 -63  -7 -98  99
 -86  37 -17 -69 -35  46  82  62  99  11
  65  85  -7 -90  23  19 -50 -56 -64  91
Результирующая матрица
 -82 -25 -22   1 -64
  36  48 -32  11 -35
  -5  80  82  66  50
  70  53  85 -59 -84
  71 -55  37 -15  22
  98 -42 -18 -97 -98
  37 -17 -69  46  99
  85  -7 -90  19 -64

1:Ключ

2:Криптология

3:Криптография

4:Криптоанализ

5:Ключ

6:В тексте ищи который должны были вам дать

7:фильтры

8:Программы-ревизоры имеют достаточно развитые алгоритмы, обнаруживают стелс-вирусы и могут даже очистить изменения версии проверяемой программы от изменений, внесенных вирусом.

9:Программы-фильтры (мониторы) или «сторожа» представляют собой небольшие резидентные программы, предназначенные для обнаружения подозрительных действий при работе компьютера, характерных для вирусов.

10:Алгоритм работы фагов можно описать следующим образом:  

1. Поиск вирусов в оперативной памяти;

2. Уничтожение вирусов;

3. "Лечение" файлов.

11:Вакцина модифицирует программу или диск таким образом, чтобы это не отражалось на их работе, а вирус будет воспринимать их заражёнными и поэтому не внедрится.

12:На экране начали выплывать странные тексты, изображения или звучат какие-либо странные звуки;

Привод CD/DVD начал открываться и закрываться сам по себе;

Программы начали запускаются сами по себе;

Появились сообщения о попытке программы выйти в интернет.

и т.д

13:Не паниковать — золотое правило, которое может избавить вас от потери важных данных и лишних переживаний.

Отключить компьютер от интернета.

Отключить компьютер от локальной сети, если он к ней был подключен.

Если симптом заражения состоит в том, что вы не можете загрузиться с жесткого диска компьютера (компьютер выдает ошибку, когда вы его включаете), попробуйте загрузиться в режиме защиты от сбоев или с диска аварийной загрузки Windows, который вы создавали при установке операционной системы на компьютер.

Прежде чем предпринимать какие-либо действия,  надо сохранить результаты вашей работы на внешний носитель (CD-диск, флэш-карту и пр.).

Получить последние обновления антивирусных баз. Если это возможно, для их получения лучше выйти в интернет не со своего компьютера, а с незараженного компьютера друзей, из интернет-кафе, с работы. Лучше воспользоваться другим компьютером, поскольку при подключении к интернету с зараженного компьютера есть вероятность отправки вирусом важной информации злоумышленникам или распространения вируса по адресам вашей адресной книги. Именно поэтому при подозрении на заражение лучше всего сразу отключиться от интернета.

Установить рекомендуемый уровень настроек антивирусной программы.

Запустить полную проверку компьютера.

ответ:Да, эти технологии могут быть опасны для человечества.

Объяснение:Что касается 3d печати, то при ней в основном используется пластик и другие полимеры, которые опасны для природы, в том числе и для человека.

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