Question

Составьте программу для рисования улитки. Сделайте надпись "Тише едешь-дальше будешь!" Делать в АВС.Помогите пожалуйста!!​

Answer 1

Ответ:

uses GraphABC;

var i,x,u:integer;

begin

FloodFill(1,1,clGreen);

SetFontSize (27);

SetBrushStyle (bsClear);

SetFontColor(clyellow);

TextOut (45,50,'Тише едешь - дальше будешь!');

SetBrushStyle (bsSolid);

SetPenWidth(7);

SetPenColor(clBrown);

x:=1;

u:=0;

for i:=1 to 120 do

begin

Arc(300,250,x,u,u+11);

x:=x+1;

u:=u+10

end;

for i:=1 to 19 do

begin

Arc(300,250,x,u,u+11);

x:=x-1;

u:=u+10

end;

FloodFill(300,251,clBrown);

SetPenColor(clOlive);

SetBrushColor(clOlive);

Ellipse(200,350,430,410);

Circle(430,345,35);

SetPenWidth(7);

Line(450,320,470,280);

Line(460,330,500,290);

Circle(470,280,7);

Circle(500,290,7);

SetBrushColor(clBlack);

Circle(435,335,10);

SetPenWidth(5);

SetPenColor(clBlack);

Arc(455,363,11,175,271)

end.

Объяснение:

Answer 2

Для создания программы рисования улитки с надписью "Тише едешь-дальше будешь!" на языке программирования Python можно использовать библиотеку turtle. Вот пример программы:

pythonCopy code
import turtle

# Создаем окно для рисования
window = turtle.Screen()
window.bgcolor("white")

# Создаем черепаху для рисования
snail = turtle.Turtle()
snail.shape("turtle")
snail.color("green")
snail.speed(1)  # Можете изменить скорость при необходимости

# Функция для рисования текста
def draw_text(text, x, y):
    snail.penup()
    snail.goto(x, y)
    snail.pendown()
    snail.write(text, align="center", font=("Arial", 12, "normal"))

# Рисуем улитку
for _ in range(4):
    snail.circle(50, 90)
snail.circle(50, 45)

# Рисуем надпись
draw_text("Тише едешь-дальше будешь!", 0, -70)

# Завершаем программу при клике на окно
window.exitonclick()

Этот код создаст окно для рисования с черепахой, которая нарисует улитку и добавит надпись "Тише едешь-дальше будешь!" в центре окна. Вы можете изменить цвет, размер и стиль улитки и надписи, а также скорость рисования, как вам угодно.