Объяснение:
І.
Комп'ютерний вірус починає діяти після завантаження зараженого файлу. Тільки після цього вірус починає діяти самостійно.
"Дії" на комп'ютер вірусів бувають абсолютно різні: від самовільного відкриття сайтів (здебільшого рекламного характеру) в браузері, уповільнення роботи комп'ютера та зменшення обсягу оперативної пам'яті до зникнення файлів (або їх зміни), форматування жорсткого диска та неспроможністю завантажити комп'ютер.
ІІ.
"Лікування" файлів антивірусом полягає в вилученні з зараженої програми коду (тіла) віруса.
var
i: Integer;
l: Single;
counter: Integer;
begin
counter := 0;
for i := 0 to 14 do begin
Read(l);
if l >= 165 then
counter := counter + 1 ;
end;
Writeln(counter);
end.
Второй вариант
const
cN: Integer = 15;
cMinSuitableLength: Single = 165;
var
arr: array [0..14] of Single;
i, counter: Integer;
begin
for i := 0 to Length(arr) - 1 do
Read(arr[i]);
counter := 0;
for i := 0 to Length(arr) - 1 do
if arr[i] >= cMinSuitableLength then
counter := counter + 1;
Writeln(counter);
end.
Объяснение: