CONST k=10; {k - количество чисел в массиве}VAR a:array[1..k] of integer; i,summ,n:integer; {i - счетчик цикла, summ - сумматор, n - количество элементов массива с четным значением} sr:real; {sr - среднее арифметическое} BEGIN summ:=0; n:=0; {Обнуляем счетчики} for i:=1 to k do begin a[i]:=random(50); {Заполняем массив случайными числами} write (a[i],' '); {Выводим массив} if a[i] mod 2=0 then begin summ:=summ+a[i]; {Находим сумму элементов массива с четными значениями} n:=n+1 end end; sr:=summ/n; {Находим среднее арифметическое} writeln; writeln (sr:0:2) {Выводим среднее арифметическое}END.
Первые антивирусные программы появились еще зимой 1984 года (первый вирус для персональных компьютеров Apple появился в 1977 году, и только в 1981 году появились вирусы, представляющие какую-либо угрозу) под названиями CHK4BOMB и BOMBSQAD. Их написал американский программист Энди Хопкинс (Andy Hopkins). CHK4BOMB позволяла проанализировать текст загрузочного модуля и выявить все текстовые сообщения и «подозрительные» участки кода. Программа BOMBSQAD перехватывала операции записи и форматирования, выполняемые через BIOS. При выявлении запрещённой операции можно было разрешить или запретить её выполнение.Первый антивирус в современном понимании этого термина, то есть резидентный, «защищающий» от вирусных атак, появился в 1985 году. Программа DRPROTECT создана усилиями Джи Вонг (Gee Wong). Разработка блокировала все операции (запись, форматирование), выполняемые через BIOS. В случае выявления такой операции программа требовала рестарта системы.
