Составить программу в Pascal, которая будет рисовать ** экране инициалы Х.C.В с помощью...

0 голосов
40 просмотров

Составить программу в Pascal, которая будет рисовать на экране инициалы Х.C.В с помощью линий и дуг


Информатика (21 баллов) | 40 просмотров
Дан 1 ответ
0 голосов

uses GraphABC;

begin  

Line(50,140,200,340);  

Line(200,140,50,340);  

Line(205,340,205,335);

Line(205,335,210,335);

Line(210,335,210,340);

Line(205,340,210,340);

arc (316,240,100,55,305);

arc (377,340,3,0,360);

Line(400,140,400,340);  

Line(400,140,500,140);

Line(400,240,500,240);  

Line(400,340,500,340);

arc (500,190,50,450,270);

arc (500,290,50,450,270);

end.

(1.7k баллов)
0

спасибо, что откликнулись :з