Как сделать, чтобы кораблик двигался вправо? ? , паскаль! uses graphabc; var i: integer; begin setwindowsize(900,500); setbrushcolor(clgray); line(150,200,200,250); line(200,250,300,250); line(300,250,350,200); line(350,200,150,200); line(250,90,250,200); floodfill(215,225,clbrown); line (250,90,290,140); line(290,140,250,170); floodfill(255,165,clred); circle(210,220,10); circle(240,220,10); circle(270,220,10); floodfill(400,100,clskyblue); line(0,250,900,250); floodfill(450,269,clnavy); end.
for i:=1 to n (добавь переменную) do
begin
line(x+100,y, x1+100, y1)
end;
end.