Предмет: Информатика,
автор: Аринка555
Pascal ABC
Мне нужна программа для ракеты, которая летит вверх
Помогите, пожалуйста, если кто-то знает)
Ответы
Автор ответа:
0
могу ошибатся
uses GraphABC; var x:integer; begin lockdrawing; For x:=3 to 500 do begin clearwindow; circle (249,500,155); rectangle (250,350,220,200); circle (235,290,10); circle (235,250,10); line (249,202,230,160); line (219,200,230,160); circle (228,355,5); circle (235,355,5); circle (245,355,5); circle (241,365,5); circle (234,365,5); circle (238,375,5); redraw; end; end.
uses GraphABC; var x:integer; begin lockdrawing; For x:=3 to 500 do begin clearwindow; circle (249,500,155); rectangle (250,350,220,200); circle (235,290,10); circle (235,250,10); line (249,202,230,160); line (219,200,230,160); circle (228,355,5); circle (235,355,5); circle (245,355,5); circle (241,365,5); circle (234,365,5); circle (238,375,5); redraw; end; end.
Автор ответа:
0
clearwindow что значит?
Похожие вопросы
Предмет: Химия,
автор: kate456748
Предмет: Информатика,
автор: Аноним
Предмет: Информатика,
автор: Vanya369Tv
Предмет: Алгебра,
автор: СаИдКа05
Предмет: Химия,
автор: AnDronCHik