Данная программа, написанная в среде программирования BorlandPascal 7.0, является электронным тестирующим пособием в области химии для 8-11 классов. В данное время существует достаточное количество программ, охватывающих различные области наук, в частности химии, использующиеся учеными. В связи с тем, что химические закономерности весьма разнообразны, одной программой их невозможно описать. Так как сейчас в школах осуществляется более основательное внедрение компьютерных технологий в систему обучения, но тем не менее, узко распространены автоматизированные проверки знаний учащихся, мною решено представить программу, позволяющую тестировать знания в системе обучения среднего образования. Создание подобных программ предусматривает значительное облегчение работы преподавателей и позволяет учащимся расширить знания в области информационных технологий.

Разработка программы

Модель и метод решения задачи

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

Описание структуры данных

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

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

a – переменная, вводимая с клавиатуры

b – переменная из дополнительной строки из файла, сравниваемая с переменной а

c – строковаяпеременная, считываемая из массива

n – количество истинности сравнения переменныхa иb

k – номер считанного массива

m – количество массивов из файла

Руководство программиста

Для осуществления задачи используются основная программа, выполняющая все основные функции и модульная программа, содержащая интерфейсную часть знакомства пользователя с программой. А также используются четыре входных файла.

В программе используются:

Функция Button Pressed ( x 1, y 1, x 2, y 2: integer ): boolean . Функция осуществляет проверку на нажатие клавиши в области заданной формальными параметрами целочисленного типа.

Процедура GraphInit – выполняет инициализацию графика и предусматривает проверку на ошибку, в результате чего, программа выходит из графического режима работы.

Процедура Face – прорисовывает интерфейс с помощью стандартных процедур библиотеки Graph .

Используются следующие процедуры библиотеки Graph :

1. SetFillStyle(pattern, color: word) – устанавливает образец штриховки и цвет.

2. Bar(x1,y1,x2,y2: integer) – рисует полосу заданного размера, используя текущий стиль и цвет.

3. SetColor(color: word) – устанавливает основной цвет, которым будет осуществляться рисование.

4. Line(x1,y1,x2.y2: integer) – рисует линию от точки (x1,y1) до точки (x2,y2).

5. OutTextxy(x,y: integer, textstring: string) – выводит текст в заданную область экрана.

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

Процедуры Question 4, Question 3, Question 2, Question 1 – выполняют считывание строковых данных длиной в 72 символа из файлов, указанных в процедурах. Задаются файловые переменные текстового типа. С помощью массива с девятью составляющими на экран выводятся строки записи q . Десятая дополнительная строка сравнивается со строковой переменной, введенной с клавиатуры и в случае истинности сравнения значение целочисленной переменной sum увеличивается на единицу. Результирующая сумма выводится на экран. Также в процедурах создается эффект протекания времени, которая выполняется переменной timer целочисленного типа, прибавляющей единицу в цикле, приостанавливая работу процедурой Delay до 50000 миллисекунд.

Модуль Entr реализуется с помощью библиотеки Graph для создания интерфейса в процедуре Enter .

Свеления о модулях.

--> ЧИТАТЬ ПОЛНОСТЬЮ <--