напишите программу по информатике в паскале, создающую рисунок, которая начинается uses...

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

напишите программу по информатике в паскале, создающую рисунок, которая начинается

uses Graph ABC

begin

и так далее


image

Информатика (34 баллов) | 32 просмотров
Дан 1 ответ
0 голосов
Правильный ответ

Uses GraphABC;
begin
Circle(100,100,20);
MoveTo(120,100);
LineTo(160,80);
LineTo(200,100);
LineTo(160,120);
LineTo(120,100);
Circle(220,100,20);
LineTo(200,100);
FloodFill(100,100,clRed);
FloodFill(220,100,clYellow);
FloodFill(160,90,clSkyBlue);
FloodFill(160,110,clGreen);
end.

Вроде как-то так, не проверял

(64 баллов)