@VLlad2005

Напишите программу, работающую с типизированным файлом, элементами которого являются значения типа integer. В этом типизированном файле хранится прямоугольный рисунок, размер которого задан в программе константами (например, если рисунок имеет размер 10 на 10 знакомест, то это указывется в константах const maxx=10; maxy=10). Целочисленные значения в типизированном файле определяют цвет знакоместа.

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

После того, как файл создан, а так же в том случае, если пользователь выбрал второй вариант, программа выводит на экран рисунок, читая значения из файла при помощи двух вложенных циклов for x:=0 to maxx-1 do и for y:=0 to maxy-1 do. Если считанное значение не попадает в диапазон от 0 до 15, программа сообщает об ошибке в файле и завершает работу. В противном случае на экран выводится символ, имеющий код 219, с использованием считанного из файла цвета.

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

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

0

@VLlad2005

Да кто нибудь может сделать эту прогу

0