vb怎么在一个圆内画一个正五边形?写下代码!

来源：学生作业帮助网编辑：作业帮时间：2024/05/06 14:09:55

vb怎么在一个圆内画一个正五边形?写下代码!
vb怎么在一个圆内画一个正五边形?写下代码!

vb怎么在一个圆内画一个正五边形?写下代码!
Private Sub Command1_Click()
Dim i As Integer
Dim Pi As Single
Dim x As Single
Dim y As Single
Dim r As Single
Pi = 3.1415926
x = 2000
y = 2000
r = 1000
Circle (x,y),r
PSet (x + r,y)
For i = 1 To 5
Line -(x + r * Cos(2 * Pi * i / 5),y + r * Sin(2 * Pi * i / 5))
Next
End Sub

vb怎么在一个圆内画一个正五边形?写下代码! 怎么用尺规在圆内画正五边形怎么在一个圆内画一个正方形? Y怎样在圆内画一个正五边形（★有证明过程）用CAD怎么在正五边形内画内切圆怎样在圆内画正五边形、、比较怎样在圆内画正五边形啊? 在圆内画一个最大的正方形要怎么画怎么在三角形内画一个最大的圆正方形内画一个最大的圆怎么画在纸上画如何用三角板和圆规在圆内画一正五边形怎样用圆规在圆内画一个正方形在圆内画五角星怎么画?只用圆规和没有刻度的直尺在圆内画一个五角星. 怎么画在一个半径2厘米的圆内画一个最大的正方形在一个圆里,只用三角尺,怎么画出一个正五边形圆规也可以用在一个圆内画一个最大的正方形的画法在一个10cm的正方形内画4个大小相同的圆,怎么求面积? 用cad怎么在一个长方形内画五个等半径的圆已知长方形长90