2 var 3 s: string; 4 begin 5 readln(s); 6 while pos('с',s)> 0 do delete(s,pos('с',s),1); 7writeln(s); 8 end.это точно
Ответ дал: Гость
думаю, что 19,5 кб = 0,019 мб.
Ответ дал: Гость
имя возраст занятие
оля 13 пение
петя 14 баскетбол
вася 13 хоккей
катя 15 танцы
коля 11 баскетбол
серёжа 11 футбол
Ответ дал: Гость
основной текст в египте писали чёрной краской ,чтобы выделить начало строки или фразы писали красным .(но выделяли редко -писчий материал был дорогим).
Популярные вопросы