Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
1) 45
2) 81
3) 167
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.это точно
21,24,27,30,33,36,39,42,45,48
Популярные вопросы