用for循环打印菱形 循环

、 在窗体上打印输出以下图形,要求用FOR循环实现。_百度知道
、 在窗体上打印输出以下图形,要求用FOR循环实现。
12 123-1 -12-123 -1234
提问者采纳
Private Sub Form_click() Dim a(1 To 4, 1 To 4) As String, k As Integer Dim i As Integer, j As Integer k = 1 For i = 1 To 4
a(i, 1) = Str(k * 1)
For j = 2 To i
a(i, j) = a(i, j - 1) & j
k = -1 * k Next i
For i = 1 To 4
For j = 1 To i
Print a(i, j);
Print Next iEnd Sub
提问者评价
非常感谢!才刚学VB,以后又不懂的还请这位大神多多帮忙
其他类似问题
为您推荐:
for循环的相关知识
其他1条回答
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁用for循环语句求100的阶层_百度知道
用for循环语句求100的阶层
用c++语言写,我不太明白嵌套问题,可以说一下马
可不可教一下几个for循环的,我对for不是太了解(两个以上的)
提问者采纳
s=1;for(i=1;i&=100;i++)
s*=i;printf(&s=&,s);*************************int func(int i){
return(1);
return(i*func(i-1)); }main(){
s=func(100);}
提问者评价
谢谢啦可是我还是不懂for循环语句
其他类似问题
为您推荐:
其他4条回答
我这个是准确计算20000以内任何正整数的阶乘,比较复杂,也不知道你是否用得着,是否看得明白。
楼上两位计算出来的只是个近似值(double的有效数是32位)。amwfnceex的那个要把func的返回型改成double,因为100!有近1.0e+158用int或long型会溢出。如果不要求精度amwfnceex的递归实现很漂亮!
#include &math.h&
int main(int argc, char* argv[])
int i,j,Num=20000,Exp=0,T
printf(&请输入一个(1,20000)之内的数:&);
scanf(&%d&,&Num);
if(Num&1) Num=1;
//if(Num&20000) Num=20000;
unsigned int Fac[20000];
for(i=1;i&20000;i++) Fac[i]=0;
for(i=1;i&=Ni++)
for(j=0;j&=Ej++) Fac[j]*=i;
for(j=0;j&=Tj++)
if(Fac[j]...
#include &iostream.h&void main(){
for (i=1; i&=100; i++)
cout&&a&&}
int idouble a=1for (i=100 ,i&=1, i--)
a=a*i这个没有用到嵌套for(变量初始化,条件,循环变量趋势)
问题解答:#include \&stdio.h\&void main(){double s=1.0; for(i=1;i&=100;i++) s*=i; printf(\&s=%e\&,s); }在这里因为积的数值太大.积S定义为浮点型,并以指数形式输出.FOR循环的嵌套;输出100-200中能被三整除的数;
for循环的相关知识
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁随笔 - 2146&
文章 - 83&评论 - 11614&trackbacks - 253
一、遍历 TStrings
List := TStringList.C
maText := 'aaa,bbb,ccc';
for s in List do
ShowMessage(s);
二、遍历数组
Arr: array[0..2] of B
for i := Low(Arr) to High(Arr) do
Arr[i] := Random(MAXBYTE);
for b in Arr do
ShowMessage(IntToStr(b));
三、遍历子界
sub: 0..9;
str := '';
for sub in [Low(sub)..High(sub)] do
str := str + IntToStr(sub);
ShowMessage(str); {}
TSub = 'A'..'G';
str := '';
for sub in [Low(sub)..High(sub)] do
str := str +
ShowMessage(str); {ABCDEFG}
sub: B {Byte 应该算是个 0..255 的子界}
for sub in [Low(sub)..High(sub)] do
Inc(num, sub);
ShowMessage(IntToStr(num)); {32640}
四、遍历枚举
TEnum = (Red,Green,Blue);
count := 0;
for enum in [Low(enum)..High(enum)] do
Inc(count);
ShowMessage(IntToStr(count)); {3}
五、遍历集合
TEnum = (Red,Green,Blue,Yellow);
TSet = set of TE
set1: set of TE
set1 := [Red, Yellow];
count := 0;
for elem in set1 do Inc(count);
ShowMessage(IntToStr(count)); {2}
set2 := [Red..Yellow];
count := 0;
for elem in set2 do Inc(count);
ShowMessage(IntToStr(count)); {4}
六、遍历字符串
str := 'ABCD';
for c in str do
ShowMessage(c);
上面是我能够想到的, 还有吗? 帮我想想.
阅读(...) 评论()linux下,用for循环嵌套实现统计目录及子目录个数_百度知道
linux下,用for循环嵌套实现统计目录及子目录个数
提问者采纳
#!/bin/shfor&dir&in&`find&.&-type&d`do&&&&if&[&-d&$dir&]&&&&&then&&&&number=`find&$dir&-type&d&|&wc&-l`&&&&echo&$dir&has&directories&$number&&&&fidone
用两个for循环嵌套
#!/bin/shfor&file&in&`ls&-a`&do&&&&for&dir&in&`find&$file&-type&d`&&&&do&&&&&&&&number=`find&$dir&-type&d&|&wc&-l`&&&&&&&&echo&&The&$dir&has&directories&$number&&&&&donedone
提问者评价
来自团队:
其他类似问题
为您推荐:
for循环的相关知识
其他1条回答
我可以帮你, 你找我吧, 兄弟
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁jquery如何用for循环
[问题点数:100分,结帖人juyonghua]
jquery如何用for循环
[问题点数:100分,结帖人juyonghua]
不显示删除回复
显示所有回复
显示星级回复
显示得分回复
只显示楼主
相关推荐:
2009年12月 PHP大版内专家分月排行榜第二2009年5月 PHP大版内专家分月排行榜第二2009年2月 PHP大版内专家分月排行榜第二2009年1月 PHP大版内专家分月排行榜第二
2009年9月 PHP大版内专家分月排行榜第三2009年3月 PHP大版内专家分月排行榜第三
2009年12月 PHP大版内专家分月排行榜第二2009年5月 PHP大版内专家分月排行榜第二2009年2月 PHP大版内专家分月排行榜第二2009年1月 PHP大版内专家分月排行榜第二
2009年9月 PHP大版内专家分月排行榜第三2009年3月 PHP大版内专家分月排行榜第三
2012年6月 Web 开发大版内专家分月排行榜第二2012年5月 Web 开发大版内专家分月排行榜第二2011年5月 PHP大版内专家分月排行榜第二2008年9月 硬件使用大版内专家分月排行榜第二
2012年7月 Web 开发大版内专家分月排行榜第三2011年8月 PHP大版内专家分月排行榜第三2011年8月 Web 开发大版内专家分月排行榜第三2011年7月 PHP大版内专家分月排行榜第三2011年4月 Web 开发大版内专家分月排行榜第三2008年9月 Windows专区大版内专家分月排行榜第三
本帖子已过去太久远了,不再提供回复功能。}

我要回帖

更多关于 for循环用法 的文章

更多推荐

版权声明:文章内容来源于网络,版权归原作者所有,如有侵权请点击这里与我们联系,我们将及时删除。

点击添加站长微信