知识问答
            
    
                                            
                                            最佳答案:我已帮你全部做好,工程下载地址我已发给你Dim pi As DoubleDim temp As DoubleDim j As IntegerDim te As 
                                        
                                    
                                            
                                            最佳答案:dim a,b,c as singlea=inputbox("a=")b=inputbox("b=")c=inputbox("c=")if ((a+b)>c a
                                        
                                    
                                            
                                            最佳答案:Private Sub Form_Click()Dim a(50),m,s,n,ps = 0n = 0RandomizePrint "原数组"For m = 0