Написать в паскаль турбо следующее :
удалить из строки w все буквы, соответствующие первой букве имени разработчика программы. вывести на экран символьную строку до и после изменения, а также количество удаленных символов.
екатерина625
3
11.11.2019 10:51
5
Другие вопросы по теме Информатика
ksapko
16.09.2019 21:36
yanoobhelpme
11.06.2019 04:30
pineapplenastya1
11.06.2019 04:30
gmurzakaevap06yh1
11.06.2019 04:30
Топтоппатимейкер
11.06.2019 04:30
tanyushalyubim
11.06.2019 04:30
vika00vgbjh
11.06.2019 04:30
Популярные вопросы
- Лексическое значение слов грядущий вещий творенье кудесник завет...
2 - Напишите сочинение-рассуждение по плану. 40 . 20 за решённое...
2 - Её поразили живые зелёные цветы и летнее солнце найти все словосочетания...
3 - Уваси пупкина кончились деньги, и он нанялся на работу. по договору...
2 - Под каким углом видна земля с орбиты марса и венеры, если марс...
1 - По трамвай массой 10т при торможении останавливается под действием...
1 - Постройте график функции у=|x+1|-x...
2 - Значение слов: редут, мусью, лафет, ковер, картечь, бивак, булат,...
3 - Напишите уравнения реакций получения гептин-3 реакцей зайцева...
3 - Напишите сочинение-рассуждение. объясните, как вы...
1
program abcd;
var
s: string[254];
c: string[1];
i: byte;
begin
Readln(s); { строка }
Readln(c); { буква }
repeat
i := Pos(c, s);
if i > 0 then
Delete(s,i,1);
until i = 0;
Writeln(s);
end.