Кожний пакет - порція інформації, що передається через мережу містить: виберіть декілька з 5 варіантів відповідей 1) порядковий номер порції 2) текст 3) адресу відправника 4) віруси 5) адресу отримувача
var s,buf: string; P: array[1..n] of integer; i, k: integer; F: Text;
begin Assign(F, 'CharCount.txt'); Reset(F); s:=''; while not SeekEof(F) do begin Read(F,buf); s:=s+buf end; Writeln(s); for i := 1 to n do P[i] := 0; for i := 1 to length(s) do begin k := Pos(s[i], T); if k > 0 then P[k] := P[k] + 1 end; for i := 1 to n do if P[i] > 0 then writeln(T[i], ' - ', P[i]:3) end.
Тестовый пример: Ксаверий Феофалактович Грушин, следственный пристав Сыскного управления при московском обер-полицмейстере,облегченно вздохнул и отложил влево, в стопку "просмотрено", сводку важных преступлений за вчерашний день Г - 1 К - 1 С - 1 Ф - 1 а - 8 б - 2 в - 13 г - 2 д - 4 е - 17 ж - 2 х - 2 и - 11 й - 5 к - 6 л - 10 м - 4 н - 13 о - 20 п - 8 р - 11 с - 12 т - 8 у - 6 ф - 1 ц - 1 ч - 3 ш - 2 ы - 3 ь - 1 я - 1
1) в Access нельзя создать таблицу путем ввода данных 2) Векторный формат изображения - описание элементов изображения (обычно контуров и/или поверхностей) в виде набора формул. Такой формат, в частности, допускает произвольное масштабирование без потери качества. 3) Борьбу с компьютерными вирусами я бы сервисом не называл 4) Выполнимость и понятность - это под большим вопросом. Алгоритм может быть и не выполним конкретным исполнителем (например, он включает операцию вычисления производной функции, которую данный исполнитель не умеет выполнять). Понятность - ну я не знаю, если я Вам приведу алгоритм работы синтаксического анализатора компилятора языка Паскаль - Вы его поймете?
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку