Вводится текст на кириллице. Преобразовать все строчные буквы в прописные - Free Pascal
Формулировка задачи:
Вводится текст на кириллице. Преобразовать все строчные буквы в прописные: А роза упала на лапу Азора – А РОЗА УПАЛА НА ЛАПУ АЗОРА.
Решение задачи: «Вводится текст на кириллице. Преобразовать все строчные буквы в прописные»
textual
Листинг программы
uses SysUtils;
var s : string;
begin
write('Строка: '); readln(s);
s := AnsiUpperCase(s); // Эта функция конвертирует кириллицу на русскоязычных ОСях
writeln(s)
end.
Объяснение кода листинга программы
- Вводится текст на кириллице.
- Вводится строка
Строка:с помощью функцииwritelnt. - С помощью функции
readlnсчитывается строка, введенная пользователем и сохраняется в переменнойs. - С помощью функции
AnsiUpperCaseпреобразуются все строчные буквы в прописные и результат сохраняется в переменнойs. - С помощью функции
writelnвыводится преобразованная строка на экран.