Новые сообщения · Правила  
Страница 1 из 11
Модератор форума: Berestovskiy 
Форум ПРОГРАММИСТОВ » ПРОГРАММИРОВАНИЕ » Паскаль » Курсовая по информатике
Курсовая по информатике
1. Построить и закрасить построенную плоскую фигуру – треугольник с вершинами (100, 100), (150, 100), (80, 170).

GiRlIeN
1 | Автор: Masha | 2012-05-06, 13:06   |  Репутация: [ + 0 ]


GiRlIeN
1 | Автор: Masha | 2012-05-06, 13:06   |  Репутация: [ + 0 ]
uses graph;
var gd,gm:integer;{переменные для инициализации графического режима}
begin
gd:=detect;{режим}
initgraph(gd,gm,'');{инициализация}
setcolor(12);{цвет линий ярко-красный}
line(100,100,150,100);{соединим точки линиями}
line(150,100,80,170);
line(80,170,100,100);
setfillstyle(1,12);{стиль заполнения- сплошная закраска тем же цветом}
floodfill(120,110,12);{точка начала закраски внутри треугольника, цвет}
readln;{читаем}
closegraph{выход из режима графики}
end.


Нужна помощь? Сюда: vkontakte.ru/berestovskiy
2 | Автор: Berestovskiy | 2012-05-06, 13:07   |  Репутация: [ + 211 ]
как подключить графический модуль Graph в паскале

GiRlIeN
3 | Автор: Masha | 2012-05-06, 13:40   |  Репутация: [ + 0 ]
В настройках)

Нужна помощь? Сюда: vkontakte.ru/berestovskiy
4 | Автор: Berestovskiy | 2012-05-06, 14:08   |  Репутация: [ + 211 ]


Нужна помощь? Сюда: vkontakte.ru/berestovskiy
4 | Автор: Berestovskiy | 2012-05-06, 14:08   |  Репутация: [ + 211 ]
Форум ПРОГРАММИСТОВ » ПРОГРАММИРОВАНИЕ » Паскаль » Курсовая по информатике
Страница 1 из 11
Поиск: