Решить в pascal. "с клавиатуры вводятся два слова. требуется найти множество гласных букв ,которые входят в первое слово ,но не входят во второе слово." ,,в

Const   gl = ['а', 'е', 'ё', 'и', 'о', 'у', 'ы', 'э', 'ю', 'я']; var   w1, w2: string;   m: set of char;   c: char;   i: integer; begin   writeln('введите первое "слово"');   readln(w1);   writeln('введите второе "слово"');   readln(w2);   m : = [];   w1 : = lowercase(w1); w2 : = lowercase(w2);   for i : = 1 to length(w1) do       if w1[i] in gl then include(m, w1[i]);   for i : = 1 to length(w2) do       if w2[i] in m then exclude(m, w2[i]);     writeln('гласные, присутствующие в первом слове и отсутствующие во втором: ');   foreach c in m do write(c, ' ');   writeln end. тестовое решение: введите первое "слово" дай, джим, на счастье лапу мне! введите второе "слово" сергей есенин гласные, присутствующие в первом слове и отсутствующие во втором: а у

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