Урок 24. Работа с матрицей

Развитие программы "Игра в крестики-нолики"

На предыдущем уроке получилась программа заполнения и вывода на кран пустого игрового  поля  family_game1.pas. Игровое поле выглядит примерно так:
 -1 -1 -1
 -1 -1 -1
 -1 -1 -1

В эту программу надо добавить фрагмент, благодаря которому программа будет предлагать поочередно каждому игроку сделать свой ход. Программа будет вводить данные игрока в такой формате:

1. номер строки
2. номер столбца
3. 0 или 1 ( в зависимости от номера игрока)

Программа изменяет значение указанной ячейки поля и выводит новое сосотояние поля после каждого хода. После ходов игроков поле будет выглядеть примерно так:
 1 -1  0
-1 -1 -1
-1 -1 -1

Разделение окон ввода и вывода

В среде Pascal можно подключить библиотеку (модуль) подпрограмм для работы с текстом - CRT. Для этого в начале программ добавляется раздел описания модулей:
uses CRT
Тогда при выполнении создается окно вывода отдельно от окна ввода. Процедура   writeln выводит текст в это окно. С помощью подпрограмм модуля CRT можно форматировать выводимый текст.

Процедура вывода игрового поля

В нашей игре придется много раз выводить на экран игровое поле. Имеет смысл оформить операторы вывода поля на экран в виде процедуры  PrintPole.
Процедура описывается в начале программы следующим образом:

procedure PrintPole (x,y:integer);  {х - количество строк, у - количество столбцов }
begin
тело процедуры;
end;

Для вызова процедуры в нужных местах программы используется оператор
PrintPole (t,s); где t - количество строк, s - количество столбцов

Практическая работа