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.
Ответ дал: Гость
нет,так как это не текствовый документ ,а картинка,и компьютер читает отсканированный файл картинкой а не текстом!
Ответ дал: Гость
если 25(из которых 15 сто пудов в школьной и 10 смешанные) берут в школьной, то 10 человек берут в районной.
если 20(из которых 10 сто пудов берут в районной 10 смешанные), то 15 в школьной
Популярные вопросы