Построить график кардиоиды - VB
Формулировка задачи:
X=a*cos(t)*(1+Cos(t));
Y=a*Sint(t)*(1+Cos(t));
a=15;
0<=t<=2Pi
Половина программы есть:
не хватает дальнейшего развития, а к зачету нужно это дело завтра. Поэтому прошу помогите
Решение задачи: «Построить график кардиоиды»
textual
Листинг программы
d = Me.Height / 2 a = 0.5 * d For t = 0 To 6.28 Step 0.01 x = a * Cos(t) * (1 + Cos(t)) y = a * Sin(t) * (1 + Cos(t)) Me.PSet (a + x, y + d) Next t
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д