Смотрите, в двоичной системе исчесления все меряется в битах и байтах. 0000 0000, это байт, т.к. состоит из восьми бит. Биты же бывают положительными и отрицательными, равняются положительные единице, отрицательные же нулю. Но тут важно понимать, как ПК воспринимает эти числа. Число 5 будет выглядить как 0000 1001, потоиу что в байте сложили числа 1 и 4 (00000001 и 00001000), на то эта система и двоичная, т.к. нечетные числа получают путем складывания четных. Путем включения каждого бита отдельно мы получим такие числа, как
00000001 - 1. 00000010 - 2. 00000100 - 4. 00001000 - 8. 00010000 - 16. 00100000 - 32. 01000000 - 64. 10000000 - 128. Число 129 займет два байта, а значит у Горыныча не останется места для голов. ответ - он умрет от нехватки битов в байтах.
j=['a','e','i','j','o','u'];
var
a:string;
b:char;
n,i,k:integer;
begin
repeat
read(b);
a:=a+b;
until b='.';
n:=length(a);
n:=n-1; {без точки}
for i:=1 to n do
if a[i]in j then
k:=k+1;
writeln(k);
end.