информатика(Паскаль)выстроить звезду.

Информатика(Паскаль)
выстроить звезду.

Задать свой вопрос
1 ответ
Program Zvezda;
Uses GraphABC;
begin SetBrushColor(clred);
Line(290, 111, 240, 190);
 Line(240, 190, 171, 190);
Line(170, 190, 241, 250);
Line(241, 250, 209, 320);
Line(209, 320, 290, 289);
 Line(290, 289, 369, 318);
 Line(369, 318, 340, 248);
Line(340, 248, 410, 190);
 Line(410, 190, 340, 190);
 Line(340, 190, 289, 111);  
Line(289, 113, 289, 289);
 Line(242, 249, 341, 190);
 Line(340, 249, 242, 190);
 Line(171, 191, 290, 220);
Line(291, 220, 411, 191);
Line(209, 319, 290, 222);
Line(290, 222, 369, 321);
Readln;
Closewindow;
End.
Вероника Черногрядская
нпяал писать
Никита Юриксон
ожидается знак BEGIN
Эльвира Слезова
стрем вышло
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт