Составьте программку для рисования домика на языке Pascal См. на картинке.

Составьте программку для рисования домика на языке Pascal См. на картинке.

Задать свой вопрос
1 ответ

uses graphabc;

begin

SetPenWidth(2);

rectangle (100,100,500,300);


line(300,100,300,300);

moveto(100,100);

lineto(200,50);

lineto(400,50);

lineto(500,100);

line(200,50,300,100);


SetBrushColor(clGray);

rectangle(150,150,250,250);

end.

, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы

Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт