рылся в своих тетрадях и нашел там код программы для построения рисунка:
program zvezda;
uses Graph;
Const zv:array[1..10,1..2]
of integer=((320,144),(364,240),(512,240),(384,288),(448,386),(320,336),(192,386),(256,288),(128,240),(256,240));
var gd,gm,i,j:integer;
begin
_gd:=detect;
_initgraph(gd,gm,'C:\Program Files\TURBO PASCAL 7.1\BGI');
_setcolor(4);
_for i:=1 to 10 do
__line to (zv(i,1),zv(i,2));
__line to (zv(1,1),zv(1,2));
_readln; Close graph;
end.
при компиляции паскаль выдает ошибку и указывает на "to" в строке
line to (zv(i,1),zv(i,2));
уже всяко разно перепробывал скобки ставить, но ничего не получается. в чем ошибка?
5 февраля 2010 в 2:02
семерка. скорее всего из за неё..
4 февраля 2010 в 19:03
В папке лежат дрова
C:\Program Files\TURBO PASCAL 7.1\BGI
Драйвер выбирается в зависимости от
Driver; Mode;
В стандартном Help паскаля есть описание.
Help Index (набираем Graph), там жмем "Константы и типы Graph.tpu", выбираем "Графические режимы" по списку смотришь режим, и ищешь драйвер в папке.
ОС у тя какая?
4 февраля 2010 в 6:03
какой то кривой паскаль у меня. он драйвера в папке с программой искал.
какие пути нужно в directories прописать?
4 февраля 2010 в 6:03
теперь вылазит ошибка ms-dos subsystem
система не поддерживает полноэкранный режим
4 февраля 2010 в 6:02
накатал программу с процесом посложнее и успел заметить надпись
BGI error: Graphicsnot initialized (use initgraph)
4 февраля 2010 в 6:01
как драйвер называется?
3 февраля 2010 в 22:03
Попробуй так.
Driver:=3; Mode:=1;
InitGraph(Driver,Mode,'C:\Program Files\TURBO PASCAL 7.1\BGI');
Еще посмотри в папочку C:\Program Files\TURBO PASCAL 7.1\BGI. Есть ли там нужный драйвер. Без него все компилируется, но работать не будет.
3 февраля 2010 в 15:04
LineTo, вспомнил. только там надо четые интегеровских значения указывать.
3 февраля 2010 в 15:04
В Line – 4, а в LineTo – 2
3 февраля 2010 в 15:04
да. поставил квадратные скобки и прога скомпилировалась. но не запускается…
3 февраля 2010 в 15:04
Вроде бы…
3 февраля 2010 в 15:04
а графический модуль то присутствует в указанной папке?
3 февраля 2010 в 15:04
graph.tpu есть.
3 февраля 2010 в 15:04
ну запусти ее. вообще ничего не пишет?
3 февраля 2010 в 15:04
вообще не реагирует на ctrl+F9
3 февраля 2010 в 15:03
может быть, в том что такой функции вообще нет. попробуй line_to или lineto
3 февраля 2010 в 15:03
В Graph'е есть функция LineTo, ее и нужно использовать, а еще CloseGraph слитно пишется
3 февраля 2010 в 15:03
тогда выдает ошибку type mismatch
3 февраля 2010 в 15:03
и указывает на вторую скобку в той же строке
3 февраля 2010 в 15:03
а разве доступ к элементу матрицы не с помощью []?