Нужно написать задание в поскале. Елочка на 3 триугольника, линиями, в цвете.

Question

Информатика

Митрофаний

11 сентября, 11:32

Нужно написать задание в поскале. Елочка на 3 триугольника, линиями, в цвете.

+3

Ответы (1)

Знаете ответ на вопрос?

Вава · Answer 1

program p;

uses crt, graph;

var

D, M:INTeGeR;

begin

clrscr;

initgraph (d, m,'') ;

setcolor (green) ;

line (200,420,300,420) ;

line (300,420,250,330) ;

line (250,330,200,420) ;

line (200,330,300,330) ;

line (300,330,250,240) ;

line (250,240,200,330) ;

line (200,240,300,240) ;

line (300,240,250,140) ;

line (250,140,200,240) ;

readkey;

end.