Мои Конспекты
Главная | Обратная связь

...

Автомобили
Астрономия
Биология
География
Дом и сад
Другие языки
Другое
Информатика
История
Культура
Литература
Логика
Математика
Медицина
Металлургия
Механика
Образование
Охрана труда
Педагогика
Политика
Право
Психология
Религия
Риторика
Социология
Спорт
Строительство
Технология
Туризм
Физика
Философия
Финансы
Химия
Черчение
Экология
Экономика
Электроника

Функции для работы с текстовой информацией





Помощь в ✍️ написании работы
Поможем с курсовой, контрольной, дипломной, рефератом, отчетом по практике, научно-исследовательской и любой другой работой

 

Приведем основные встроенные функции, позволяющие работать с текстовой информацией.

 

 

Функция Описание
StrToInt Преобразует строку в целое.
IntToStr Преобразует целое в строку.
FloatToStr Преобразует плавающее число в строку.
StrToFloat Преобразует строку в плавающее.число
StrToDate Преобразует строку в дату.
DateToStr Преобразует дату в строку.
Length Возвращает длину символьной строки.
Copy Возвращает подстроку из строки.
Insert Вставить подстроку в нужную позицию строки
Delete Удаляет подстроку из строки.
Pos Возвращает позицию подстроки в строке.
Ord возвращает код для введенного символа
Chr Возвращает символ по его коду
UpperCase Преобразует строку к верхнему регистру букв.
LowerCase Преобразует строку к нижнему регистру букв.

 

Пример 1. Функция chr возвращает символ по его коду. Синтаксис:

function Chr(X: Byte): Char;

Например, создадим небольшое приложение, которое по коду символа выводит его представление. Внешний вид формы может быть следующим:

 

 

На кнопку “Ввод” напишем обработчик:

var kod:integer;

begin

kod:=StrToInt(Edit1.Text);

label2.caption:=' Символ = '+ chr(kod);

 

Пример 2. Функция ord возвращает код символа для введенного символа. Синтаксис функции:

function Ord(X);

Например, разработаем приложение, которое по введенному символу будет возвращать его код. Внешний вид приложения:

 

На кнопку «Ввод» напишем обработчик:

var

kod:integer;

ch:char;

str:string[1];

begin

str:=Edit1.Text;

ch:=str[1];

kod:=ord(ch);

Label2.Caption:='Код символа = '+IntToStr(kod);

end;

 

Задания для самостоятельной работы

 

  1. Дано арифметическое выражение в виде строки символов. Определить:
    1. Сколько раз в этом выражении встречается символ ‘+’, ’-‘, ’*’, ‘/’
    2. Сколько всего символов

 

  1. Дан русский текст, максимальная длина которого 255 символов.
    1. Определить число слов в тексте, если слово это набор символов, ограниченный пробелами слева и справа.
    2. В этом тексте заменить все вхождения слова «Маша» на слово «Саша».
    3. Подсчитать сколько раз в тексте встречается каждая буква русского алфавита.
  2. Введите строку русскими строчными буквами. Преобразуйте введенные строчные буквы в прописные и выведите строку.
  3. Зашифровать введенный текст, заменив каждый символ, стоящий через один от данного символа, в таблице кодировки. Исходное разбиение на строки дол­жно быть сохранено.
  4. Ввести строку, состоящую из строчных русских букв. Преобразовать стро­ку в прописные русские буквы.
  5. Проверить, является ли введенная строка числом.
  6. Вывести на экран 1-ю часть таблицы перекодировки ( от 0 до 128).
  7. Напишите программу-телеграф, которая принимает от пользователя сообще­ние и выводит его на экран в виде последовательности точек и тире. Вывод точек и тире можно сопроводить звуковым сигналом соответствующей длитель­ности. Азбука Морзе для букв русского алфавита приведена ниже:

 

А "-." Б "-..." В ".---" Г "--."

Д "-.." Е " " Ж "...-" З "--.."

И ".." Й ".---" К "-.-" Л ".-.."

М "--" H "-." О "---" П ".--."

Р ".-." С "..." Т "-" У "..-"

Ф "..-." Х "...." Ц "-.-." Ч "---."

Ш "----" Щ "--.-" Ъ "-..-" Ы "-.--"

Ь "-..-" Э "..-." Ю "..--" Я ".-.-"

Контрольные вопросы

 

  1. С помощью какого типа данных можно представить один символ данных?
  2. Как описать символ данных?
  3. Как присвоить символу нужное значение?
  4. Что такое строка данных? Как описать строку данных?
  5. Каков максимальный размер строки?
  6. Как описать строку нужного размера?
  7. Как строке присвоить значение?
  8. Какие функции для работы с текстовыми данными Вы знаете?

 

 

Доверь свою работу ✍️ кандидату наук!
Поможем с курсовой, контрольной, дипломной, рефератом, отчетом по практике, научно-исследовательской и любой другой работой



Поиск по сайту:







©2015-2020 mykonspekts.ru Все права принадлежат авторам размещенных материалов.