Program Pr1;
uses crt;
var fl1,fl2:text;
i,n,v,a,b:integer;
Begin
clrscr;
assign(fl1,'input.txt');
assign(fl2,'output.txt');
reset(fl1);
readln(fl1,n);
v:=0;
for i:=1 to 1000000 do begin
if i>=10 then begin
a:=i div 10;
b:=i mod 10;
if (a mod 2<>0) and (b mod 2<>0) then v:=v{?} 1; {здесь либо пропущен знак либо v1-новая переменная не перечисленная в списке описания переменных}
end
else if i mod 2<>0 then v:=v 1;{здесь тоже самое}
if v=n then break;
end;
rewrite(fl2);
writeln(fl2,v);
close(fl1);
close(fl2);
end.
N=2^i
i=5 бит
K=30 символов
I=K*i
I=30*5=150 бит информации
ответ: 150 бит
2) I=2160 бит
K=135 символов
i=I/K
i=16 бит
N=2^i
N=65 536 мощность алфавита
ответ: 65 536
3) K=5120 символов
I=2.5 Кбайт=2560 байт=20 480 бит
i=I/K
i=20 480/5120=4 бит
N=2^i
N=16 символов
ответ: 16
4) N=64
N=2^i
i=6 бит
I=1/32 Мбайт = 32 Кбайт = 32 768 байт = 262 144 бит
K=I/i
K=262 144/6=43 690 символов
ответ: 43 690