13 Окт 2019 в 21:41
180 +1
0
Ответы
1

Пример кода на PascalABC.NET для рисования простого квадрата:

program DrawSquare;
uses GraphABC;
begin
Window.Title := 'Square';
SetWindowSize(400, 400);
ClearWindow;
SetPenColor(clBlack);
Line(100, 100, 200, 100);
Line(200, 100, 200, 200);
Line(200, 200, 100, 200);
Line(100, 200, 100, 100);
Readln;
end.

Пример кода на PascalABC.NET для рисования простого круга:

program DrawCircle;
uses GraphABC;
begin
Window.Title := 'Circle';
SetWindowSize(400, 400);
ClearWindow;
SetPenColor(clBlack);
Circle(200, 200, 50);
Readln;
end.

Выполните эти программы в среде разработки PascalABC.NET, чтобы увидеть рисунки на экране.

19 Апр 2024 в 11:28
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
Прямой эфир