Вывести из строки гласные буквы и их кол-во на языке pascal, прошу !

Uses crt; var  a: set of char;   s: string;   j: char;   i,k: integer; begin  writeln('введите строку: '); readln(s); a: =[]; k: =0; for i: =1 to length(s) do  if s[i] in ['а','а','е','е','ё','ё','о','о','у','у','ы','ы','э','э','ю','ю','я','я'] then  begin    a: =a+[s[i]];     k: =k+1;   end; write('гласные буквы, присутствующие в строке: '); for j: ='а' to 'я' do  if j in a then  write(j: 2);   writeln;   write ('количество гласных букв: ',k); end.

1)компьютер может обрабатывать числовую,текстовую,графическую,звуковую и видеоинформацию. 2)микрофон - звуковая информация ; сканер - графическая информация ; цифровая камера- видеоинформация. 3)клавиатура- важнейшее устройство ввода информации в память компьютера. 4) алфавитно-цифровые,функциональные,блок редактирования, служебные, клавиши windows, дополнительная цифровая клавиатура. 5) для удобства. 6) курсорные стрелки нужны для перемещения курсора по тексту. 7)главное это запомнить эти два слова: «фыва» и « олдж». указательный левый палец должен находиться на букве «а», правый на «о». если присмотреть, то на этих буквах есть выпуклые чёрточки. средний левый должен находиться на букве «в», правый на «л».оба больших пальца на пробел. остальными пальцами вы набираете текст.

Общий расчёт делается через двоичный логарифм (его можно заменить делением двух десятичных или натуральных логарифмов) и потом округление до целого числа с избытком (т.е. округляем всегда вверх) обозначается вот такими палочками с выступами сверху ⌈ ⌉ .

Единственный нюанс в том, что это формула для N значений. А тут спрашивается, сколько разрядов нужно для хранения числа 134.

Я так понимаю, что при этом количество значений N = 134 + 1 = 135 (эта единица- учёт того, что есть ещё и нулевое значение, по крайней мере в такой форме хранения целых числел- в виде двоичного числа).

Ну, либо можно использовать таблицу степеней двойки, и подобрать по ней такую степень, значение которой равно или чуть больше вашего числа. Опять же, здесь N- это количество значений, которые можно хранить в    двоичных разрядов (т.е. тут тоже надо считать и нулевое значение). Например:

 

1   2

2   4

3   8

4   16

5   32

6   64

7   128    <-- это значение ещё не достаточное (меньше, чем 135)

8   256   <-- а вот это значение минимально необходимое (8 разрядов)

9   512

10   1024

11   2048

12   4096

13   8192

14   16384

15   32768

16   65536