Заменить в строке все малые буквы- на большие, а большие- на малые - Pascal ABC
Формулировка задачи:
Дана строка, заменить в этой строке все малые буквы - на большие, а большие - на малые.
Спасибо за внимание!
Решение задачи: «Заменить в строке все малые буквы- на большие, а большие- на малые»
textual
Листинг программы
Var s, newS : string; i : integer; begin s:='ывТиюб гРпиЗ'; Writeln(s); i:=1; newS:=''; For i:=1 to length(s) do begin If (ord(s[i])>=65) and (ord(s[i])<=90) then newS:=newS+chr(ord(s[i])+32) else If (ord(s[i])>=97) and (ord(s[i])<=122) then newS:=newS+chr(ord(s[i])-32) else If (ord(s[i])>=122) and (ord(s[i])<=223) then newS:=newS+chr(ord(s[i])+32) else If (ord(s[i])>=224) and (ord(s[i])<=255) then newS:=newS+chr(ord(s[i])-32) else newS:=newS+s[i]; end; s:=newS; Writeln(s); end.
Объяснение кода листинга программы
- Создаются две переменные типа string: s и newS.
- В переменную s записывается исходная строка 'ывТиюб гРпиЗ'.
- Выводится на экран содержимое переменной s.
- Создается переменная i типа integer.
- В переменную newS записывается пустая строка.
- Запускается цикл for, который выполняется от 1 до длины переменной s.
- Внутри цикла проверяется каждая буква в строке s.
- Если символ является заглавной буквой (ord(s[i])>=65) и в то же время не является символом новой строки (ord(s[i])<=90), то к переменной newS добавляется символ, полученный путем преобразования текущего символа в строчную букву с помощью функции chr и добавления 32 к его коду с помощью оператора
+
. - Если символ является прописной буквой (ord(s[i])>=97) и в то же время не является символом новой строки (ord(s[i])<=122), то к переменной newS добавляется символ, полученный путем преобразования текущего символа в строчную букву с помощью функции chr и вычитания 32 из его кода с помощью оператора
-
. - Если символ является символом новой строки (ord(s[i])>=122) и в то же время не является символом новой строки (ord(s[i])<=223), то к переменной newS добавляется символ, полученный путем преобразования текущего символа в строчную букву с помощью функции chr и добавления 32 к его коду с помощью оператора
+
. - Если символ является символом новой строки (ord(s[i])>=224) и в то же время не является символом новой строки (ord(s[i])<=255), то к переменной newS добавляется символ, полученный путем преобразования текущего символа в строчную букву с помощью функции chr и вычитания 32 из его кода с помощью оператора
-
. - Если символ не соответствует ни одному из вышеперечисленных условий, то он просто добавляется в переменную newS без изменений.
- После завершения цикла переменная newS заменяет переменную s.
- Выводится на экран содержимое переменной newS.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д