Составить синквейн к слову мультимедиа

var c: char; s: string; i,k,p: integer; begin readln(c); {чтение заданного символа} readln(s); {чтение заданного слова} p: = pos(c,s); {определяем позицию символа} if (p=0) then {функция вернёт 0, если символ не будет найден} writeln('такого символа в слове нет.') else {если символ есть, то } begin writeln('указанный символ расположен на позиции: ',p); k: = 0; {k хранит количество вхождений} p: = length(s); {p хранит длину строки(слова)} for i: =1 to p do {пробегаем по всем символам слова} if (s[i]=c) then inc(k); {если символ совпадает, увеличиваем на 1 переменную k} writeln('количество вхождений данного символа: ',k); end; end.

а) наличие электромагнитного излучения, сrt  б) ухудшение качества изображения при изменении угла обзора, crt в) компактные размеры lcd  г) достаточно сильное ухудшение качества изображения при изменении рекомендуемой производителем разрешающей способности crt  д) формирование изображения с лучей электронных пушек, crt е) меньший вред для здоровья человека при работе. lcd

var h,a: integer;

begin

  a: =1;

  repeat

      h: = h+3;

      a: =2*a;

      writeln('прошло часов - ',h,', амеб - ',a)

  until h> =30;

  readln;

end.

16-битной кодировке unicode.

один символ s =16 бит

количество бит текстового файла    к=  51200 бит/с * 10 с= 512000

количество символов к/s=512000/16  =32000