Есть ответ 👍

Выберите правильный код на задание Дана строка А. В этой строке удалите все буквы «а» и выведите оставшуюся строку на экран.

247
377
Посмотреть ответы 2

Ответы на вопрос:


третье по мойму.Я люблю когда волосатые мужики обмазываются маслом

eduard22222
4,8(78 оценок)

Вот так эту можно решить на современном паскале. но, к сожалению, так в школах не учат, заставляя тратить время и силы на громоздкие программы, в которых легко ошибиться. // pascalabc.net 3.2 begin   write(readlnstring('-> ').towords.where(x-> x.left(2)='со').count) end. пример: -> три собаки сосали одну косточку 2 а вот так (примерно, потому что обычно еще хуже) учат писать программы в var   s: string;   i,n,k,p: integer; begin   write('-> '); readln(s);   if copy(s,1,2)='со' then k: =1 else k: =0;   delete(s,1,3);   repeat       i: =pos(' со',s);       if i> 0 then begin           inc(k);           delete(s,1,i+3)           end   until i=0;   writeln(k) end.

Популярно: Информатика