для кодирования 757770 символов потребуется 757770 байтов
757770байт < 1,44 мбайт
да, книга поместиться на дискетку
Ответ дал: Гость
х+54=х+у
х-х+54=у
у=54(ор)-во 2-ой корзине
х=54+38=92(ор)- в 1-ой корзине
92-27=65(ор)- в 3-ей корзине.
Ответ дал: Гость
var s : string; symb : char; i : longint; begin readln(s); readln(symb); if pos(symb,s)=0 then writeln('в этом слове нет этого символа') else begin i: =0; while pos(symb,s)< > 0 do begin write(pos(symb,s)+i,' '); i: =i+1; delete(s,pos(symb,s),1); end; end; writeln; writeln(i); end.
Популярные вопросы