Реферат: Программ-игра «Морской бой», с использованием анимированных графических объектов и возможностью управлять их движением с помощью клавиатуры

{Домашнее задание на тему "графика"}

{Выполнил студент: Макаров Владимир, группа С-26}

{Игра "Морской Бой"}

program SeaWar;

uses Graph,crt;

var

GraphDriver:integer;

GraphMode:integer;

ErrorCode:integer; {Переменные для инициализации графики}

s_score:string;

{Все переменные, используемые в программе}

x :integer;

y :integer; {Переменные для хранения координат}

xx :integer; {и переменные цикла}

typ :integer; {Тип текущего корабля}

xxx :integer; {Координаты}

tarx :integer; {Координаты прицела и пушки}

fx :integer; {Координаты}

fy :integer;

score :integer; {Кол-во очков}

old_score :integer; {Прошлое значение кол-ва очков}

mimo :integer; {Кол-во промахов}

oldx :integer; {Координаты}

oldy :integer;

crx :integer;

• «
• 1
• 2
• 3
• 4
• 5
• 6
• 7
• 8
• 9
• 10
• »

• >>> Скачать <<<