Помогите, пожалуйста, с решением задачи в Паскале по информатике.
Приложения:
Ответы на вопрос
Ответил Аноним
0
// PascalABC.NET 3.3, сборка 1542 от 05.10.2017
// Внимание! Если программа не работает, обновите версию!
begin
var s:=ReadlnString;
var n:=s.Where(c->c='a').Count;
s:=s.Replace('a','b');
Writeln(s); Writeln(n)
end.
Пример
aabbccabadef
bbbbccbbbdef
4
// Внимание! Если программа не работает, обновите версию!
begin
var s:=ReadlnString;
var n:=s.Where(c->c='a').Count;
s:=s.Replace('a','b');
Writeln(s); Writeln(n)
end.
Пример
aabbccabadef
bbbbccbbbdef
4
Новые вопросы