Ввести с консоли строку символов произвольной длины (до 80 символов). Поменять в ней все маленькие символы ‘a’ и ‘b’ на заглавные и вывести на консоль полученную строку.

// PascalABC.NET 3.0, сборка 1156 от 30.01.2016begin  var s:=ReadlnString('Вводите строку:');  for var i:=1 to s.Length do    case s[i] of    'a':s[i]:='A';    'b':s[i]:='B'    end;  Writeln(s)end.Тестовое решение:Вводите строку: The monkey ate five bananasThe monkey Ate five BAnAnAs