Заливка экрана и рисование окружности в разных модулях - Turbo Pascal

Узнай цену своей работы

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

Помогите написать задачу.Основная программа и 2 модуля 1 модуль заливает экран жёлтым цветом 2 модуль выводит окружность основная прога обращается к 1 и 2 модулю и прекращает работу.

Решение задачи: «Заливка экрана и рисование окружности в разных модулях»

textual
Листинг программы
unit MyGraph;
 
interface
 
procedure YellowScreen;
implementation
 
uses
  Graph;
 
procedure YellowScreen;
begin
  SetBkColor(Yellow);
end;
end.

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

unit MyGraph; interface procedure YellowScreen; implementation uses Graph; procedure YellowScreen; begin SetBkColor(Yellow); end; end.

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

10   голосов , оценка 3.6 из 5
Похожие ответы