【牡丹花源码】【hbuilderapp源码下载】【delphi网页源码】c 源码转换成vb源码

时间:2024-12-24 08:07:43 编辑:市场活跃度指标公式源码 来源:卡密提取网页版源码

1.将C改写成VB数加上268后再开方
2.将C改写成VB输出分行与列

c  源码转换成vb源码

将C改写成VB数加上268后再开方

       Sub main()

       Dim i&,源源码 x&, y&, z&

       For i = 1 To 

          x = Sqr(i + ) '   /*x为加上后开方后的结果*/

           y = Sqr(i + ) '  /*y为再加上后开方后的结果*/

             If (x * x = i +  And y * y = i + ) Then '/*如果一个数的平方根的平方等于该数,这说明此数是码转牡丹花源码完全平方数*/

               Debug.Print

               Debug.Print i

             End If

       Next

       End Sub

将C改写成VB输出分行与列

       Sub main()

         Dim i%, j%, result%

         Debug.Print

         For i = 1 To 9

            For j = 1 To 9

                 result = i * j

                 Debug.Print i; "*"; j; "="; result, '/*-3d表示左对齐,占3位*/

换成hbuilderapp源码下载

               Next

换成hbuilderapp源码下载

             Debug.Print  '/*每一行后换行*/

换成hbuilderapp源码下载

       Next

换成hbuilderapp源码下载

       End Sub

换成hbuilderapp源码下载