Составить программу, которая будет рисовать букву 'К'

Question

Информатика

Тимоня

4 декабря, 13:41

Составить программу, которая будет рисовать букву 'К'

+5

Ответы (1)

Знаете ответ?

Лидуся · Answer 1

Program K;

uses GraphABC;

begin

SetWindowWidth (800) ;

SetWindowHeight (600) ;

SetFontColor (clBlack) ;

SetFontSize (18) ;

SetPenWidth (3) ;

SetFontStyle (fsBold) ;

Line (200,400,200,200) ;

Line (200,300,300,200) ;

Line (200,300,300,400) ;

end.