VB用一维数组计算1+2+...+100和

VB用一维数组计算1+2+...+100和

Private Sub Command1_Click()
Dim a(100) As Integer
For i = 1 To 100
a(i) = i
s = s + a(i)
Next i
Text1.Text = s
End Sub

你好，故根据世界卫生组织已发布的《世界卫生组织儿童成长标准》指出，与基因和人种因素相比，营养、喂养方式和医护等对婴儿的成长影响起着决定性的作用。这份儿童成长标准对儿童的体重与年龄、身高与年龄、体重与身高三者之间的关系进行了科学系统的分析，并给出了相应的量化指标。按照这些指标，医生和家庭就能知晓儿童是否存在营养不良，并可及早发现诸如营养不良或肥胖症等问题。
在该标准中明确指出，女童一岁的体重标准为 9.0 公斤（18斤），女童一岁的身高标准为74厘米。
所以根据你的描述，初步判断如果你家女儿一岁时体重达到20斤，身高为80厘米，应该属于正常范围，且是稍高于正常平均值，这一点不用担心。
上个月孩子体重和身高都没有明显增加，可能是由于天气忽冷忽热或者是饮食不太符合孩子口味导致孩子食欲不佳。另外，除了晚上让孩子睡好觉外，白天的睡眠同样重要，一岁的孩子一般来说，白天的睡眠时间应该在2个小时左右。这样才能更好的促进孩子身体发育尤其是脑神经发育。
再者一定要注意孩子饮食荤素搭配，营养全面，必要时可以带孩子去当地医院测量孩子的微量元素是否正常，根据检查结果适量补充。
最后祝你家宝宝健康成长！
病情分析：
你好，通过你的描述，一般是可以考虑为正常的！建议您，最好是可以做注意补钙治疗！和微量元素的补充！
指导意见：
12个月孩子身长达到：男婴平均76.5厘米（70.9-82.1厘米），大于81.5厘米为过高，小于70.7厘米为过矮。女婴平均75.1厘米（69.7-80.5厘米）。大于80.0厘米为过高，小于68.6厘米为过矮。12个月孩子体重：男婴平均9.9千克（7.8-12.0千克），女婴平均9.2千克（7.2-11.3千克）。
病情分析：
您好，1岁孩子的身高平均为：75公分
指导意见：
七岁孩子的体重平均为21斤左右，所以，您的孩子现在的发育应该是正常的，祝您的孩子身体健康
病情分析：
宝宝一周岁的身高和体重
指导意见：
一周岁宝宝的标准身高是75厘米，体重是20斤，你的宝宝发育还是不错的，一岁后宝宝的生长发育较前缓慢，是正常的
病情分析：
您好，您家宝宝的身高和体重都是正常的
指导意见：
一般一岁和一岁以上左右的孩子体重（kg）=8+2x年龄，所以您家宝宝的体重应该是十千克，也就是二十斤，小孩出身时身高是50cm左右，生后第一年身高约增长25cm，您家宝宝80cm属于正常范围，不用担心，宝宝都很正常，希望我的建议对您有帮助，祝您的宝宝健康成长