PASCAL!1. Найти, как нередко встречается определенный знак в строке2. У Леонида

// PascalABC.NET 3.2, сборка 1370 от 24.12.2016
// Внимание! Если программка не работает, обновите версию!

begin
  var s:=ReadlnString('Введите строку:').ToLower;
  var c:=ReadlnChar('Введите разыскиваемую букву:').ToLower;
  Writeln('Буква встречается ',s.Where(a-gt;a=c).Count,' раз(а)')
end.

Пример
Введите строчку: А роза упала на лапу Азора
Введите разыскиваемую буковку: а
Буква встречается 8 раз(а)

// PascalABC.NET 3.2, сборка 1370 от 24.12.2016
// Внимание! Если программка не работает, обновите версию!

begin
  var s:=ReadlnString('Введите фразу:');
  s.Replace('Ты','Я').Replace('ты','я').Println
end.

Пример
Введите фразу: Тыков ест тыблоко
Яков ест яблоко

// PascalABC.NET 3.2, сборка 1370 от 24.12.2016
// Внимание! Если программка не работает, обновите версию!

begin
  var s:=ReadlnString('Введите строчку:');
  var s1:=ReadlnString('Что отыскать?');
  var s2:=ReadlnString('Чем заменить?');
  s:=s.Replace(s1,s2);
  s.Println;
end.

Пример
Введите строчку: мать, мама, что я буду делать, мать, мать, как я буду жить?
Что отыскать? мать
Чем заменить? папа
папа, папа, что я буду делать, папа, папа, как я буду жить?