Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
точно не знаю но если два ластик и люди)
я так думаю)
Объяснение:
program xxx;
var a,s : string;
i: integer;
begin
writeln ('введите слово и символ-');
readln (s,a);
for i: =1 to length(a) do
if copy (s,i,1)=a then writeln (i);
readln
end.
2^i = 64
i = 6 бит приходится на 1 символ
3 * 40 * 60 * 6 = 43200 бит
43200 : 8 = 5400 байт
Популярные вопросы