vb数字金字塔

PrivateSubForm_Load()Me.AutoRedraw=TrueFori=-8To8PrintSpc(9-Abs(i));String(2*Abs(i)+1,Trim(Abs(i)+1)

解题思路：历史知识的积累解题过程：<三国演义>最终答案：略

6737再问：谢了

大部份研究来源显示埃及存在的金字塔结构数目有81座到112座金字塔,而大多数学者赞成较高的数目.1842年,KarlRichardLepsius制做了埃及金字塔列表（ListofEgyptianpyr

埃及金字塔内,发现一组神奇数字：142857.看似平凡的数字,为什么说他最神奇呢?我们把它从1乘到6看看142857X1=142857142857X2=285714142857X3=428571142

A=5,B=4,C=15.提示：每一条格子里的数字乘积等于比他略长一点的格子里数字的乘积的一半!来自“数学春夏秋冬”专业数学团队的解答!很高兴为您解答,祝你学习进步!如果您认可我的回答,请点击下面的【

等式一金字塔自重1015=地球的重量等式二金字塔塔高10亿=地球到太阳的距离（1.5亿公里）等式三金字塔塔高平方=塔面三角形面积等式四金字塔底周长塔高=圆围半径等式五金字塔底周长×2=赤道的时分度等式

PrivateSubCommand1_Click()Dimi,aAsInteger,bAsStringDoa=4LoopWhilea9Fori=1Toab=""Forj=1To(i-1)*2+1b=b

一种说法是：透明玻璃制的金字塔、尺寸和埃及吉萨金字塔完全一样,793块落板装玻璃,用结构硅胶粘结,每块玻璃的铅框都尽量小,以保证光滑表面的闪光效果,透明的金字塔后面,美丽的卢浮宫没受一点妨碍,相反,一

Private Sub Command1_Click() Dim i As Integer, j As Int

下面几个数据算上是迷.7个数字所显示的精确的等式,使考古学家、建筑学家、地理学家、物理学家都迷惑不解.等式一∶(金字塔)自重×l0l5=地球的重量等式二∶(金字塔)塔高×l0亿=地球到太阳的距离1.5

Dim n%, st$ 'st为控制所显示字符或数字变量n = InputBox("请输入数字菱形行数,必须为奇数",&n

0—命运多舛的悲剧者1—刚直不阿的正义者2—爱情忠实的守望者3—孑然一身的旅行者4—新新时代的叛逆者5—随遇而安的求生者6—逆向思维的睿智者7—志存高远的理想者8—锲而不舍的爱美者9—相得益彰的矛盾者

这个好像上学的时候是书上的题PrivateSubCommand1_Click()Fori=1To4'这个4是层数,可以用变量,从键盘获取PrintTab(30-3*i);'30是第一行输出的位置,总之

∵3×10=12×3×4×5，∴3×5×4=12×1×2×4×6×A，解得：A=5，C=12×3×10=15，3×4×5=12×2×3×5×B，解得：B=4，答：A=5，B=4，C=15．再问：再问：

privatesubcommand1_clickaaa5endsubSubaaa(n)Fori=1TonPrintSpc(n-i);String(2*i-1,"*")NextEndSu

乔普斯金字塔高度乘上一千万倍以后--即九千八百万里,正好是地球到太阳之间的距离.子午线通过金字塔,正好将陆地和海洋分为相等的两半地基周围除以其高度的两倍,即得出著名的π＝3．14159这一数字.在中国

settalkoffcleainput"inputn(1-9):"tonFORi=1TOnFORj=1TOn-i''ENDFORFORj=1TOiSTR(j,1)ENDFORFORj=i-1TO1ST

PrivateSubCommand1_Click()Dimi,jAsIntegerFori=1To13Forj=1ToiPrint"";NextjForj=iTo13-i+1PrintChr(56-i

1.#include"stdio.h"intmain(){inti,j,k,n;printf("输入行数:");scanf("%d",&n);for(i=1;i