В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География

Дан целочисленный массив. найти минимум среди нечетных элементов
массива. это ! ​

Показать ответ
Ответ:
dalepidorasp0833z
dalepidorasp0833z
01.09.2022 13:57
1)вирусы
Все существующие компьютерные вирусы можно разделить 
на несколько групп по производимым ими действиям и «образу жизни».Бывают совершенно безвредные вирусы.Они размножаются, живут своей неведомой людям жизнью и никак себя 
не проявляют. Как правило, единственным побочным эффектом их существования является сокращение свободного пространства на диске. Правда, это не является сколько-нибудь критичным – в большинстве случаев вирусы весьма компактны.Следующей ступенью являются,
так называемые, неопасные вирусы.Они уже стараются заявить пользователю о себе во весь голос: 
используют различные звуковые, графические или текстовые эффекты.Например:проигрывают в определенное время какую–нибудь мелодию, выводят на экран 
различные надписи, могут даже начать переворачивать экран вверх ногами или 
устроить настоящий «буквопад» – находящиеся на экране символы будут на глазах изумленного и напуганного пользователя сваливаться вниз. При этом, все данные на компьютере остаются в целости и сохранности, а программы продолжают нормально работать. К сожалению, создатели вирусов не ограничиваются 
описанными выше –безобидными шутками.Подавляющее большинство распространенных вирусов могут нарушать нормальную работу компьютера, вызывать зависание определенных программ. Бывают и более страшные случаи, когда в вирус заложены алгоритмы, уничтожающие или искажающие данные на диске машины. Таков, например, вирус под названием OneHalf («половина»), вызвавший несколько лет назад настоящую эпидемию.Незаметно для пользователя он постепенно зашифровывал содержимое жесткого 
диска, попутно вызывая некоторые побочные эффекты типа участившихся зависаний Windows, а при определенных условиях вирус мог «забыть» ключ к этому шифру.Более же примитивные вирусы могут попросту стереть все, не понравившиеся им, 
файлы, либо записать в них произвольный мусор вместо данных. Нельзя не учитывать, что наделать бед и, казалось бы, безопасные вирусы: известны случаи, когда программистские ошибки в них приводили к фатальным последствиям.Периодически появляются различные сведения о вирусах, якобы портящих 
мониторы, выводящих из строя жесткие диски и наносящих другие «физические 
увечья» компьютеру. Но, так как «живьем» их никто не видел, это вполне можно 
считать одной из легенд компьютерного мира. За исключением
единственного случая.Летом 1998 г. из Юго–Восточной Азии пришел вирус Win95.CIH, вызвавший в Европе серьезную эпидемию. Вирус разрушал BIOS, после чего из строя выходила системная плата компьютера. В большинстве современных компьютеров flash–BIOS сделан перезаписываемым, чем и воспользовались авторы вируса. В процессе его работы вместо BIOS записывается произвольный мусор, причем так, что многие системные платы уже не поддаются восстановлению.К чести отечественных вирусологов нельзя не отметить, что именно они первыми 
сумели побороть эту заразу – специалисты компании «Лаборатория Касперского» 
нашли лечения вируса практически сразу после его появления.
0,0(0 оценок)
Ответ:
tamila2002саша2004
tamila2002саша2004
17.05.2022 01:39
Var
  arr : array [1..30] of integer;
  sum, count, i, a : integer;
begin
  read (a);
  for i := 1 to 30 do read (arr[i]);
  count := 0; sum := 0;
  for i := 1 to 30 do
  begin
    if arr[i] < 0 then sum := sum + arr[i]
    else if (arr[i] > 0) and (arr[i] <= a) then count := count + 1;
  end;
  writeln (sum, ' ', count);
end.

var
  arr : array [1..30] of integer;
  i : integer;
begin
  for i := 1 to 30 do read (arr[i]);
  for i := 30 downto 2 do
    if arr[i] * arr[i - 1] < 0 then // проверка знака
    begin
      writeln (i - 1); 
      halt; // Остановка программы
    end;
  writeln ('-1'); // Таких нет
end.
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота