Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
можно назвать - собака
или
агент @ мail.ru
writeln('a[',i,']=',a[i]);
readln;
end.
function max (x,y : longint) : longint; begin if x> y then max: =x else max: =y; end; var k : longint; s : string; begin readln(s); while (pos('.',s)< > 0)or(pos('! ',s)< > 0)or(pos('? ',s)< > 0) do
begin k: =k+1;
delete(s,max(max(pos('.',s),pos('! ',('? ',); end; writeln(k); end.
256= 2^i=2^8следовательно i=8 битов
8*80*32=20480 битов
20480*2=40960 битов=5120 байт=5 килобайт
^ - это я так обозначила степень
i - количество информации(обычно обозначается большой буквой)
* - умножить
Популярные вопросы