1: удали <span>Sony Vegas
2: установи </span>K-Lite Codec Pack(либо же переустанови, если таковой имеется), но перед установкой удали старые кодеки.
3: установи Quick Time и ПЕРЕЗАГРУЗИ ПК
4:Установи Sony Vegas (13.0), если не прокатит откатись до 12-ой версии.
1)
var
s: string;
begin
writeln('Введите строку: ');
readln(s);
if pos('а', s) <> 0 then writeln('В строке есть буква "а"')
else writeln('В строке нет буквы "а"');
end.
2)
var
s: string;
i, a: byte;
begin
a := 0;
writeln('Введите строку: ');
readln(s);
for i := 1 to length(s) do if s[i] = 'м' then a := a + 1;
writeln('В строке буква "м" встречается ', a, ' раз(а)');
end.
3)
var
s: string;
begin
writeln('Введите строку: ');
readln(s);
while pos('и', s) <> 0 do delete(s, pos('и', s), 1);
writeln('Строка после удаления букв(ы) "и": ', s);
end.
Кит - з символа это к
N=2^1
64 это два в шестой
отсюда i=6 бит
I=k*i=3*6=18
Ночь - ноль - соль - сель - сень - день
рота - роза - коза - поза - пола - полк
бант - кант - карт - кара - кора - коса
бег - бес - бас - пас - пат - шат - шаг
море - горе - гора - кора - кома - кума - сума - суша
миг - мир - тир - тис - лис - рис - вис - вес - век