Операторы DATA и READ
Задача 74
' Исходные данные для прямоугольников
' В каждом DATA координаты диагоналей и цвет
DATA 30, 50, 130, 150, 1
DATA 160, 100, 280, 170, 4
DATA 300, 180, 450, 270, 14
1 Считывание данных и построение прямоугольников
SCREEN 9
READ XI, Yl, X2, Y2, С
LINE (Xl, Y1)-(X2, Y2), С, BF
READ XI, Yl, X2, Y2, С
LINE (XI, Y1)-(X2, Y2), C, BF
READ XI, Yl, X2, Y2, С
LINE (XI, Y1)-(X2, Y2), C, BF
END
Назад Содержание Вперед