Const
n=5;
type
ta=array[1..n] of string;
var ar:ta;i:integer;
path:string;
procedure Save(ar:ta;n:integer;path:string);
var i:integer;
f:text;
begin;
assign(f,path);
rewrite(f);
for i:=1 to n do
writeln(f,ar[i]);
close(f);
end;
begin;
writeln('Введите массив:');
for i:=1 to n do
readln(ar[i]);
writeln('Введите путь к файлу:');
readln(path);
Save(ar,n,path);
<span>end.</span>
Нам надо найти I
I=K×i
I=80×i
В русском алфавите 32 буквы
значит
32=2в степени i
i=5
I=80×5=400
Ответ:400бит
А скорее всего, она же с текстом работает)
1) 27*8=216 бит
2)52*2=104 байта
3)38*2=76 байт
4)32*8=256 бит
6)20*35*2=1400
Прошу прощения, но не знаю сколько битов или байтов в кодировке КОИ-8, поэтому не могу решить 5