amaraks67
?>

Напишите функцию для рисования шестиугольника (в Python)

Информатика

Ответы

Dmitriy793

вот код:

Объяснение:

from turtle import *

setup()

x = 200

# Use your own value

y = 200

# Use your own value

def circles (radius, colour):

      penup()

      pencolor (colour)

      goto (0,radius)

      pendown ()

      setheading (180)

      circle (radius)

      penup()

circles (100, "red")

circles (50, "yellow")

circles (25, "green")

def hexagon (size_length):

      pendown ()

      forward(size_length)

      right (60)

goto (x, y)  

for _ in range (6):

      hexagon (50)              

exitonclick ()

contact
// PascalABC.NET 3.3, сборка 1605 от 31.12.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var P:=new real[3,2]; // массив координат вершин
  for var i:=0 to 2 do
    (P[i,0],P[i,1]):=ReadReal2('Введите x и y вершины '+(i+1));
  // длины сторон
  var L:(real,real)->real:=(x,y)->Sqrt(x**2+y**2);
  var a:=L(P[1,0]-P[0,0],P[1,1]-P[0,1]);
  var b:=L(P[2,0]-P[1,0],P[2,1]-P[1,1]);
  var c:=L(P[0,0]-P[2,0],P[0,1]-P[2,1]);
  if (a+b>c) and (a+c>b) and (b+c>a) then // треугольник существует
    if (a=b) or (a=c) or (b=c) then Writeln('Треугольник равнобедренный')
    else Writeln('Треугольник не равнобедренный')
  else Writeln('Треугольник построить невозможно')  
end.

Замечание: для сборок ниже 1603 от 30.12.2017 необходимо заменить
Sqrt(x**2+y**2) на Sqrt(x*x+y*y)

Даны действительные числа x1,y1,x2,y2,x3,y3. выясните является треугольник с такими вершинами равнос
Lyubov214
// PascalABC.NET 3.3, сборка 1605 от 31.12.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var P:=new real[3,2]; // массив координат вершин
  for var i:=0 to 2 do
    (P[i,0],P[i,1]):=ReadReal2('Введите x и y вершины '+(i+1));
  // длины сторон
  var L:(real,real)->real:=(x,y)->Sqrt(x**2+y**2);
  var a:=L(P[1,0]-P[0,0],P[1,1]-P[0,1]);
  var b:=L(P[2,0]-P[1,0],P[2,1]-P[1,1]);
  var c:=L(P[0,0]-P[2,0],P[0,1]-P[2,1]);
  if (a+b>c) and (a+c>b) and (b+c>a) then // треугольник существует
    if (a=b) or (a=c) or (b=c) then Writeln('Треугольник равнобедренный')
    else Writeln('Треугольник не равнобедренный')
  else Writeln('Треугольник построить невозможно')  
end.

Замечание: для сборок ниже 1603 от 30.12.2017 необходимо заменить
Sqrt(x**2+y**2) на Sqrt(x*x+y*y)

Даны действительные числа x1,y1,x2,y2,x3,y3. выясните является треугольник с такими вершинами равнос

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Напишите функцию для рисования шестиугольника (в Python)
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

Varvara
Cannabikh
Альберт Луиза1595
mdsazonovatv1173
aivia29
proh-dorohova5244
galinab1111326
kim-1971
ekattatarenko
ГармаеваЕкатерина1637
НиколаевнаФ
olg53362928
Maly01984489
blagorodovaanna375
Борисовна