Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
1. нужно найти сколько бит весит обна буква.
64 это 6 бит информации.
2. i=6*20= 120 бит
мы умножыли биты на количество используемых букв.
вот и
желтый знак - нехватка памяти
все остальное - размер
написано для pascal abc
uses graphabc; begin window.title : = 'apple'; var y,y0,x,t: integer; brush.color : = clgreen; y0: =70; x: =70; lockdrawing; for t : = 0 to 8 do begin y: =y0+5*t*t; window.clear(clwhite); circle(x,y,50); redraw; sleep(100); end; end.
var ch,n,i: longint;
ch1,s: string;
begin
read(s,ch);
n: =length(s);
writeln(n,' ',ch);
str(ch,ch1);
for i: =1 to n do if s[i]=ch1 then write(i,' ');
end.
Популярные вопросы