Дана строка. Преобразовать в ней все прописные латинские буквы в строчные - VB
Формулировка задачи:
Дана строка. Преобразовать в ней все прописные латинские буквы в строчные
Решение задачи: «Дана строка. Преобразовать в ней все прописные латинские буквы в строчные»
textual
Листинг программы
program qq; var a: string; i: integer; begin read(a); for i := 1 to length(a) do if a[i] in ['A'..'Z'] then a[i] := chr(ord(a[i]) + 32); writeln(a); end.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д