Ошибка Неизвестное имя 'LoadPicture' - PascalABC.NET

Формулировка задачи:

Составил программу,запускай и пишет: Неизвестное имя 'LoadPicture' Вот сама программа

program upr1a;
uses crt,GraphABC;
var pic:integer;
begin
   SetWindowSize(500,500);
   ClearWindow(clwhite);
   pic:=LoadPicture('a.jpg');
   DrawPicture(pic,10,10,150,200);
   pic:=LoadPicture('b.jpg');
   DrawPicture(pic,170,10,150,200);
   pic:=LoadPicture('c.jpg');
   DrawPicture(pic,330,10,150,200);
end.

Решение задачи: «Ошибка Неизвестное имя 'LoadPicture'»

Листинг программы

program otkrytka ;
uses crt , GraphABC ;
var tema , ris:integer ; fzal , fris , s:string ;
begin 
SetWindowSize (600 , 400 );
 write ('Введите номер темы: 1-зима , 2-весна , 3-лето, 4-осень');
read (tema);
 write ('Введите поздравления ');
read (s);
 case tema of
  1:begin fzal:='snow.gif' ; fris:='buratino.gif' end;
 2:begin fzal:='sun.gif' ; fris:='popugai.gif' end;
  3:begin fzal:='daisy.gif' ; fris:='karlson.gif' end;
   4:begin fzal:='list.gif' ; fris:='lisa.gif' end;
   end ;
   clearwindow ;
   SetPenColor (clred);
   Rectangle (0,0,120,400);
   ris:=LoadPicture(fris);
  DrawPicture (ris,380,70,200,320);
 SetBrushStyle(bsClear);
SetFontColor (clgreen);
SetFontSize (34) ;
SetFontStyle (fsBold);
TextOut (60,40,s);
 
end.

Объяснение кода листинга программы

В данном коде используется язык программирования PascalABC.Net.

Сначала устанавливается размер окна программы и запрашивается номер темы.
Затем запрашивается ввод поздравлений.
Далее происходит определение изображений в зависимости от выбранной темы.
Очищается окно, устанавливается красный цвет для рисования рамки, рисуется прямоугольник размером 120x400 пикселей, и загружается изображение.
Рисуется изображение на экране, устанавливается зеленый цвет шрифта, устанавливается размер шрифта 34, и выводится текст поздравления.