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

1. напишите следующие высказывания в виде логических выражений: на уроке ученики выполняли лабораторную работу и сообщали результаты исследований учителю. ты можешь купить в магазине продукты, если у тебя есть деньги. при замерзании воды выделяется тепло. 2. даны высказывания: а = {2+3=5}, b= {2*2=4}. определить истинность высказываний: а, в, а& в, а, в, аvв, а→в, а↔в. 3. составить таблицы истинности для следующих логических выражений: f=а∨b& (a& a)∨b 4. найти значение логических выражений: f = (0 & 0) & (1 & 1)

Показать ответ
Ответ:
Kracylia
Kracylia
27.10.2020 07:20
1)вирусы
Все существующие компьютерные вирусы можно разделить 
на несколько групп по производимым ими действиям и «образу жизни».Бывают совершенно безвредные вирусы.Они размножаются, живут своей неведомой людям жизнью и никак себя 
не проявляют. Как правило, единственным побочным эффектом их существования является сокращение свободного пространства на диске. Правда, это не является сколько-нибудь критичным – в большинстве случаев вирусы весьма компактны.Следующей ступенью являются,
так называемые, неопасные вирусы.Они уже стараются заявить пользователю о себе во весь голос: 
используют различные звуковые, графические или текстовые эффекты.Например:проигрывают в определенное время какую–нибудь мелодию, выводят на экран 
различные надписи, могут даже начать переворачивать экран вверх ногами или 
устроить настоящий «буквопад» – находящиеся на экране символы будут на глазах изумленного и напуганного пользователя сваливаться вниз. При этом, все данные на компьютере остаются в целости и сохранности, а программы продолжают нормально работать. К сожалению, создатели вирусов не ограничиваются 
описанными выше –безобидными шутками.Подавляющее большинство распространенных вирусов могут нарушать нормальную работу компьютера, вызывать зависание определенных программ. Бывают и более страшные случаи, когда в вирус заложены алгоритмы, уничтожающие или искажающие данные на диске машины. Таков, например, вирус под названием OneHalf («половина»), вызвавший несколько лет назад настоящую эпидемию.Незаметно для пользователя он постепенно зашифровывал содержимое жесткого 
диска, попутно вызывая некоторые побочные эффекты типа участившихся зависаний Windows, а при определенных условиях вирус мог «забыть» ключ к этому шифру.Более же примитивные вирусы могут попросту стереть все, не понравившиеся им, 
файлы, либо записать в них произвольный мусор вместо данных. Нельзя не учитывать, что наделать бед и, казалось бы, безопасные вирусы: известны случаи, когда программистские ошибки в них приводили к фатальным последствиям.Периодически появляются различные сведения о вирусах, якобы портящих 
мониторы, выводящих из строя жесткие диски и наносящих другие «физические 
увечья» компьютеру. Но, так как «живьем» их никто не видел, это вполне можно 
считать одной из легенд компьютерного мира. За исключением
единственного случая.Летом 1998 г. из Юго–Восточной Азии пришел вирус Win95.CIH, вызвавший в Европе серьезную эпидемию. Вирус разрушал BIOS, после чего из строя выходила системная плата компьютера. В большинстве современных компьютеров flash–BIOS сделан перезаписываемым, чем и воспользовались авторы вируса. В процессе его работы вместо BIOS записывается произвольный мусор, причем так, что многие системные платы уже не поддаются восстановлению.К чести отечественных вирусологов нельзя не отметить, что именно они первыми 
сумели побороть эту заразу – специалисты компании «Лаборатория Касперского» 
нашли лечения вируса практически сразу после его появления.
0,0(0 оценок)
Ответ:
sagunush13
sagunush13
03.11.2021 17:17
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-бота