| 网站首页 | 技术文章 | 下载频道 | 博客 | 编程论坛 |
 
| 技术教程首页 | 开发语言 | WEB开发 | .NET技术 | 数据库 | 操作系统 | 网页制作 |
 
 
您现在的位置: 编程中国 >> 技术教程 >> 数据库 >> VFP >> VFP技术资料 >> 正文
  ►  数组行和列元素对换
数组行和列元素对换
作者:roland772    阅读人次:……    文章来源:本站原创    发布时间:2007/6/26    网友评论()条
 

原帖及讨论:http://bbs.bccn.net/thread-150264-1-1.html

将一个二维数组行和列元素对换,存到另一个二维数组中.

以下是我自己写的哈。

clea
dime a(3,2)
dime b(2,3)
for i=1 to 3
for j=1 to 2
  input "a("+str(i,1)+","+str(j,1)+")=" to a(i,j)
next
next
for i=1 to 3
for j=1 to 2
  ?? "a("+str(i,1)+","+str(j,1)+")="+str(a(i,j),3)+space(5)
next
?
next
for i=1 to 2
for j=1 to 3
  b(i,j)=a(j,i)
next
next
?
for i=1 to 2
for j=1 to 3
  ?? "b("+str(i,1)+","+str(j,1)+")="+str(b(i,j),3)+space(5)
next
?
next

retu

 

 
文章录入:静夜思    责任编辑:静夜思 
  • 上一篇文章:

  • 下一篇文章:

  •  
    相关文章
    原创地带
    24小时热门帖子