Тема контрольной работы: Разработка программы, позволяющую определить последовательность квадратов, через которые проходит прямая из точки A в то

Работа содержит:
-программа в в Turbo Pascal 7.0
-пояснительная записка

Задача.
На плоскости задана прямоугольная сетка размером M на N и две точки на ней: исходная A и конечная B. Разработать программу, позволяющую определить последовательность квадратов, через которые про-ходит прямая из точки A в точку B.

Задача. На плоскости задана прямоугольная сетка размером M на N и две точки на ней: исходная A и конечная B. Разработать программу, позво-ляющую определить последовательность квадратов, через которые про-ходит прямая из точки A в точку B.

Модель (решение задачи)
1.    Задаем сетку, для этого используем два одномерных массива, в первом из  которых будут находиться числа от 0 до m, а во втором - от 0 до n. Эти числа будут означать координаты квадратов.
2.    Задаем координаты точек A и B.
3.    Используя вложенные циклы, в первом из которых параметр изменяется от ординаты начальной точки до ординаты конечной точки, уменьшенной на единицу, а во втором – от абсциссы начальной точки, увеличенной на едини-цу, до абсциссы конечной точки, находим два значения: y и y1, при помощи которых будем проверять, проходит ли прямая через данный квадрат.
4.    Если прямая проходит через квадрат, то мы создаем два новых массива, в первом из которых будут находиться абсциссы квадратов, а во втором – ор-динаты,  а также подсчитаем количество квадратов через которые проходит прямая.
5.    Если количество квадратов будет отлично от нуля, то выводим последова-тельность квадратов, через которые проходит прямая и количество квадра-тов, иначе выводим сообщение, что начальная и конечная точки совпадают.

Блок – схема