Количество каналов = 1 канал
Информационный объем файла = 5,25 Мбайт = 5,25 * 1024 * 1024 байт
Звуковая глубина = 16 бит = 2 байта
Частота дискретизации = 22,05 КГц = 22050 Гц
Время звучания -?
Информационный объем файла = Количество каналов * Время звучания * Частота Дискретизации * Звуковая Гулубина
Время звучания = Информационный объем файла / (Количество каналов * Частота Дискретизации * Звуковая Гулубина) = 5,25 * 1024 *1024 / (1* 22050 * 2 ) = 125 c (с округлением до целого значения)
модель
на одну букву в леао
................................
<span>a = input("a = ")
if a == bool:
print("b = 4")
else:
print(" b = -4")</span>
1. если слово из 2-х букв
var a,b:char;
begin
readln(a,b);
writeln(a,b);
writeln(b,a);
writeln(a,a);
writeln(b,b);
end.
2, если не из двух букв
тут сначала вводится n - максимальная длина слова, а уже потом 2 буквы
var a,b:char;
n:integer;
procedure gen(i:integer;s:string);
begin
if i>n then exit;
if i<>0 then writeln(s);
gen(i+1,s+a);
gen(i+1,s+b);
end;
begin
readln(n);
readln(a,b);
gen(0,'');
end.