Лабораторна робота №12
Тема: Обробка текстів
Мета: Здобуття навиків з обробки текстової інформації.
1 Теоретичні відомості
Текстові змінні описують за допомогою дописування символа $ до її імені:
10 T$=”Iнформатика”
Під час розв’язування багатьох задач потрібно вміти виділяти з текстових даних певну частину символів. Для цього, а також для інших перетворень над цими даними, використовують стандартні текстові функції. Набір функцій наведено в таблиці:
LEFT$(A$,K) |
Виділяє К символів з A$, починаючи з першого |
RIGHT$(A$,K) |
Виділяє з A$ справа частину довжиною К символів |
MID$(A$,L,M) |
Виділяє з A$ частину довжиною М символів, починаючи від символу з номером L |
LEN(A$) |
Визначає кількість символів тексту A$ |
VAL(A$) |
Дане типу текст перетворює в числове |
STR$(X) |
Перетворює числове дане в текст |
2 Хід роботи
Приклад. Дано текст, який складається з букв і пропусків. На друк вивести слова, які містяться в ньому, і їх кількість. Словом вважати послідовність букв, розділених пропусками.
1. Графічний алгоритм наведений на рис.12.1
Рисунок 12.1-
Графічний алгоритм
2. Програма мовою GW Basic
10 REM РОБОТА З ТЕКСТОМ
20 INPUT T$
30 PRINT “ТЕКСТ:”
40 PRINT T$
50 K=0 : S$=“ “
60 PRINT
70 PRINT “СЛОВА:”
80 FOR I=1 TO LEN(T$)
90 C$=MID$(T$,I,1)
100 IF C$=“ “ THEN 120
110 S$=S$+C$ : GOTO 130
120 IF LEN(S$)< >0 THEN PRINT S$ : K=K+1: S$=“ “
130 NEXT I
140 IF LEN(S$)< >0 THEN PRINT S$ : K=K+1
150 PRINT “КІЛЬКІСТЬ СЛІВ:”;K
160 END
ТЕКСТ:
Поздоровляю з Новим Роком
СЛОВА:
Поздоровляю
з
Новим
Роком
КІЛЬКІСТЬ СЛІВ: 4
Пояснення до програми
Згідно з графічним алгоритмом, рис.12.1, символ 3 забезпечує введення заданого тексту Т$, в символі 5 здійснюється друк цього тексту. Кількість слів у тексті позначається через К, окреме слово S$, кожний символ в слові - C$.
Функція LEN(T$) обчислює число символів у тексті T$. Таким чином в циклі, заголовок якого заданий символом 10, буде здійснюватись перегляд тексту по одному символу. В символі 11 за допомогою функції MID$ виділяється кожний символ, і його значення присвоюється змінній C$. Якщо цей символ відмінний від пропуску (символ 2), то він додається до змінної S$, символ 6, де формується слово. Якщо символ C$ є пропуск, то згідно з умовою задачі цим символом розділяються слова. Формування слова S$ закінчено, і воно виводиться на друк, символ 7. В лічильнику слів, символ 9, фіксується їх кількість. Якщо в кінці тексту не буде пропусків, то останнє слово не буде виведене на друк в циклі. В цьому випадку останнє слово буде друкуватись за допомогою символа 14.
3 Контрольні запитання
Як оголошуються символьні змінні мовами GW Basic?
Скільки символів може міститись в одному програмному рядку мови GW Basic?
Як визначити кількість символів в тексті мовами GW Basic?
Яким програмним засобом виконується перегляд тексту по одному чи по М символів мовами GW Basic?