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

Question

Информатика

Васяна

12 марта, 15:21

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

+3

Ответы (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.