Размещено на http://www.allbest.ru/

Введение

В данной курсовой работе рассматривалась задача на обработку текста с применением конечно-автоматной модели. Условие задачи: имеется текст, содержащий слова, знаки препинания и другие символы, а также числа. Число - непрерывная последовательность цифр, перед которой может быть (а может не быть) знак «-» или «+» (таким образом, в этом задании рассматриваются только целые числа). Найти максимальное (по величине) число. Была построена модель на основе детерминированного полностью определенного конечного автомата без выхода, на основе которой был разработан алгоритм решения задачи и выполнена его программная реализация на языке программирования Visual Basic 2005.

1. Конечно-автоматная модель алгоритма решения задачи

Для выполнения задачи требуется 5 основных состояния и условия перехода между ними:

1. Движение по массиву символов:

-символ массива не является цифрой или знаком отрицательности;

2. Проверка отрицательности:

-символ массива является знаком отрицательности;

3. Запись числа при движении по массиву:

-символ массива является цифрой;

4. Сравнение полученного числа с максимальным и запись нового максимального, если полученное число является таковым:

-символ массива не является цифрой или знаком отрицательности;

-предыдущим состоянием была запись числа;

5. Выдача максимального числа в качестве результата:

-конец массива.

Схематичное представление модели представлено на рисунке 1.

Рис.1 Модель конечного автомата.

2. Алгоритм решения задачи

В начале работы программы задаются значения необходимых переменных и загружается текст в виде массива символов. Движение по массиву осуществляется посимвольно с использованием цикла. Очередной символ проходит проверку, и, в зависимости от её результата, выполняется переход в одно из состояний конечного автомата. Первой выполняется проверка конца массива, и, в случае положительного результата, программа выводит максимальное число. В противном случае проверяется - является ли символ цифрой, и начинается запись числа и дальнейшее движение по массиву, если это так. Если символ не является цифрой, то выполняется сравнение записанного числа с максимальным значением, которое перезаписывается, если условие соблюдено. Далее запись числа прекращается, а само число обнуляется. Следующее действие - проверка отрицательности и возврат к первому шагу (движение по массиву).

Блок-схема этих процессов изображена на рисунке 2.

Рис. 2 Блок-схема алгоритма программы.

3. Программная реализация алгоритма решения задачи

программа visual basic алгоритм

Программа написана на языке Visual Basic 2005.

На форме размещены текстовые поля для просмотра обрабатываемого текста и для вывода результата, функциональные кнопки для различных действий (Рис. 3).

Рис. 3 Окно программы.

Основное текстовое поле содержит текст для обработки, текстовое поле с меткой «Результат» отображает результат работы программы (максимальное число в тексте).

Кнопка «Загрузить из файла» выводит диалоговое окно, позволяющее загрузить текст из файла с форматом *.txt (Рис. 4).

Кнопка «Ввести вручную» позволяет пользователю самостоятельно ввести текст для обработки.

Кнопка «Поиск максимального» выполняет основную задачу программы - поиск максимального числа в тексте.

Кнопка «Очистить» позволяет очистить текстовые поля.

Рис. 4 Диалоговое окно загрузки текста из файла

Ниже приведен программный код продукта:

Public Class Form1

Dim MyFileName, s As String

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim t() As Char

Dim check, minus As Boolean

Dim state As Byte

Dim i, n, a, max As Integer

Dim c As String

state = 1

s = TextBox1.Text

t = s.ToCharArray

n = UBound(t)

max = -2147483648

a = -2147483648

c = ""

minus = False

For i = 0 To n

check = IsNumeric(t(i))

If check = True Then

state = 2

Else

state = 1

minus = False

c = ""

End If

If t(i) = "-" Then

minus = True

c = "-"

End If

Select Case state

Case 1

If a > max Then

max = a

TextBox2.Text = Str(max)

End If

a = -2147483648

Case 2

c = c + t(i)

a = Val(c)

If i = n And a > max Then

max = a

TextBox2.Text = Str(max)

End If

End Select

Next i

If TextBox1.Text = "" Then

TextBox2.Text = "Требуется текст"

MsgBox("Требуется текст")

End If

If TextBox2.Text = "" Then TextBox2.Text = "Чисел не найдено"

End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

Dim MyOpenFileDialog = New OpenFileDialog()

MyOpenFileDialog.Filter = "txt-files|*.txt;"

If MyOpenFileDialog.ShowDialog() = Windows.Forms.DialogResult.OK Then

MyFileName = MyOpenFileDialog.FileName

End If

FileOpen(1, MyFileName, OpenMode.Input)

TextBox1.Text = ""

Do Until EOF(1)

s = LineInput(1)

TextBox1.Text &= s & vbCrLf

Loop

FileClose(1)

TextBox1.ReadOnly = True

End Sub

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click

TextBox1.Text = ""

TextBox2.Text = ""

End Sub

Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click

TextBox1.ReadOnly = False

TextBox1.Focus()

End Sub

Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged

TextBox2.Text = ""

End Sub

End Class

Заключение

В данной курсовой работе была решена задача на обработку текста с применением конечно-автоматной модели. Был построен детерминированный полностью определенный конечный автомат без выхода. На основе конечно-автоматной модели был разработан алгоритм решения задачи. Программная реализация алгоритма выполнена на языке программирования Visual Basic 2005. Программа позволяет ввести произвольный русский или латинский текст, содержащий числа. В качестве результата выводится максимальное число.

Список литературы

Пример оформления списка литературы:

1. ГОСТ 2.105-95. Общие требования к текстовым документам [Текст]. - Взамен ГОСТ 2.105-79, ГОСТ 2.906-71; введ. 1996-07-01.

2. ГОСТ 19.701-90. Схемы алгоритмов программ, данных и систем [Текст]. - Взамен ГОСТ 19.002-80; введ. 1992-01-01.

3. Зюбин В. Е. Программирование информационно-управляющих систем на основе конечных автоматов: учебное пособие. -- Новосибирск: Изд-во: Новосиб. гос. ун-т, 2012. -- 96 с.

4. Непейвода Н.Н. Стили и методы программирования: курс лекций, учебное пособие. -- М.: Интернет-университет информационных технологий, 2014. -- С. 145--212. -- 316 с.

Размещено на Allbest.ru