Примеры вирусов( именно примеры а не их классификация)

Koh, already.com, jerusalem (time),  srcvir,  sharefun,  linux.bliss,  win95.hps, win95.marburg,  redteam,  cross,  accessiv..

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

Тупым перебором символов (не самое удачное решение): var txt: text; s: string; cnt: integer; begin   assign(txt,'c: \text.txt');   reset(txt);   while not eof(txt) do  begin       readln(txt,s);       for var i: =1 to length(s) do if lowercase(s[i]) in ['а','е','ё','и','о','у','ы','э','ю','я'] then cnt: =cnt+1;   end;   close(txt);   writeln(cnt, ' гласных'); end.   сам текст должен быть в файле "c: \text.txt"