Cоставить программу построения на экране ломаной кривой - VB

Узнай цену своей работы

Формулировка задачи:

Помогите составить программу построения на экране ломаной, длины звеньев которой образует арифметическую прогрессию, а угол поворота каждого последующего звена относительно предыдущего остается неизменным.

Решение задачи: «Cоставить программу построения на экране ломаной кривой»

textual
Листинг программы
Private Sub Form_Click()
Cls
Dim i As Long
CurrentX = ScaleWidth / 2
CurrentY = ScaleHeight / 2
For i = 1 To 500
  Line -Step(i * 10 * Sin(i), i * 10 * Cos(i))
Next
End Sub

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

13   голосов , оценка 4.462 из 5
Похожие ответы