Предмет: Информатика,
автор: Lincorn
Ввести с консоли строку символов произвольной длины (до 80 символов). Поменять в ней все маленькие символы ‘a’ и ‘b’ на заглавные и вывести на консоль полученную строку.
Ответы
Автор ответа:
0
// PascalABC.NET 3.0, сборка 1156 от 30.01.2016
begin
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 bananas
The monkey Ate five BAnAnAs
begin
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 bananas
The monkey Ate five BAnAnAs
Похожие вопросы
Предмет: Информатика,
автор: EXB8
Предмет: Қазақ тiлi,
автор: alemtyulyuev150
Предмет: Литература,
автор: veronikafilanova88
Предмет: Химия,
автор: berns88
Предмет: Алгебра,
автор: найл6999