Помогите нарисовать паровоз с колёсами в Pascal abs с колёсами через line и cirkle

Question

Помогите нарисовать паровоз с колёсами в Pascal abs с колёсами через line и cirkle

Answer 1

Не очень то и получилось)

uses graphabc;
beginsetwindowsize(900,500);line(200,100,700,100);line(200,100,50,250);line(50,250,700,250);line(700,100,700,250);line(200,100,200,250);line(700,200,100,200);circle(150,250,25);circle(350,250,25);circle(500,250,25);circle(650,250,25);end.

Comments

uses graphabc;

begin
setwindowsize(900,500);
line(200,100,700,100);
line(200,100,50,250);
line(50,250,700,250);
line(700,100,700,250);
line(200,100,200,250);
line(700,200,100,200);
circle(150,250,25);
circle(350,250,25);
circle(500,250,25);
circle(650,250,25);
end.

---

какое е же вам спасибо!графику в школе никакую дети в паскале не видят-а здесь прямо подарок для нас, учителей)

---

на здоровье)