Нарисовать машину- QBasic(Бейсик)

disel
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
CLS
SCREEN 9
LINE (110, 100)-(250, 100)
LINE (250, 100)-(280, 130)
LINE (280, 130)-(335, 130)
LINE (335, 130)-(340, 135)
LINE (340, 135)-(340, 160)
LINE (340, 160)-(280, 160)
CIRCLE (260, 160), 20
LINE (240, 160)-(160, 160)
LINE (110, 100)-(100, 110)
LINE (100, 110)-(100, 155)
LINE (100, 155)-(105, 160)
CIRCLE (140, 160), 20
LINE (105, 160)-(120, 160)

Тестирование выполнено в программе QB64 ( Скачать )

Похожие записи/страницы:

Leave a Comment