как в Pascal подключить графику

[Livar]

помогите подключить графику Initgraph что-то не работает

[vasketsov]

Код давай

[Megabyte]

Во-первых, у тебя должен быть файл egavga.bgi в том же каталоге, что и твоя программа (это что-то типа графического драйвера)

uses Graph;
....
Var
  i, j: integer;
Begin
 i:=0; // Графический режим, 0 - автоопределение
 InitGraph(i, j, '') // Вместо '' может быть путь к egavga.bgi
 ......  // Рисование ...
 CloseGraph; // Переход в текстовый режим