| 查看: 1436 | 回复: 12 | ||
| 当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖 | ||
[求助]
求助各位编个小程序
|
||
|
1)定义整数数组flag[NUM][NUM]， NUMXNUM为点阵的结点总数。把所 有的数组值fiag[j]设为0。其中，0表示该结点还未被统计过，1表示 该结点被统计过; (2)令i=0，j=0，开始计算第一个结点; (3)定义一个全局变量grain_Size一用来记录每个晶粒所包含的点阵结点个 数之和，令grain_Size=0; (4)如果fiag[j]等于0，令flag[j]等于1，执行递归函数stat_gain(i,j) (5)如果fiag[j]等于1，就计算下一个结点，重复第(3)条; (6)记录这个晶粒的尺寸; (7)统计下一个结点，重复第(3)条，直到所有的结点都统计一遍。 函数stat_gain(i,j)的执行步骤是: 分别比较结点P(i，j)和其周围六个最近邻结点(P1(i一1，j一1)，P2(i一1，j)， p3(i，j一1)，P4(i，j+1)，P5(i+1，j)，P6(i+1，j))的取向。如果P1的取向与P (i，j)的取向不同或者已经统计过，则比较下一个结点，直至六个结点都比较一遍; 如果P1的取向与P(i，j)的取向相同并且没有统计过，晶粒个数grain_size增加1， 并把fiag[j]的值变为1。然后，执行函数 stat_grain(i-1，j-1);依此类推。 数据形式是这样的 列 行 对应坐标点的值 1 1 0 2 1 0 3 1 0 4 1 0 5 1 0 7 1 0 8 1 1 9 1 1 10 1 1 11 1 1 。 。 。 |
回复此楼» 猜你喜欢
085601材料工程找调剂
已经有11人回复
-
总分293求调剂
已经有9人回复
-
334分 一志愿武理 材料求调剂
已经有5人回复
-
327求调剂
已经有6人回复
-
329求调剂
已经有10人回复
-
275求调剂
已经有15人回复
-
291求调剂
已经有6人回复
-
309求调剂
已经有7人回复
-
297求调剂
已经有11人回复
-
一志愿南航 335分 | 0856 | GPA 4.07 | 有科研经历
已经有6人回复
» 本主题相关价值贴推荐，对您同样有帮助:
- 求助高手帮忙编一个Fortran的小程序，重金悬赏......
已经有15人回复
- 求助计算机高人，编写个Fortran程序
已经有13人回复
- 【求助】C++编写的图像压缩的程序
已经有13人回复
- 【求助】求助帮助编一个读取TEXT文件画图的程序
已经有8人回复
- 【求助】有用Monte Carlo 编过有关Fluid中粒子运动的程序
已经有6人回复
- 【求助】帮我编个程啊~C语言，C++，Matlab，VB...都行~
已经有14人回复
- 【求助】帮忙编个用于VASP小程序
已经有22人回复
- 【求助】求c++编一个简单计算器的源代码
已经有6人回复
- 求助
已经有3人回复
cmdblock
银虫 (正式写手)
- 应助: 23 (小学生)
- 金币: 234.2
- 散金: 79
- 帖子: 719
- 在线: 123.7小时
- 虫号: 1520796
- 注册: 2011-12-02
- 性别: GG
- 专业: 计算机网络
9楼2012-01-04 08:49:03
2楼2011-12-28 17:47:31
3楼2011-12-29 09:09:33
psxlcs
金虫 (正式写手)
- 应助: 3 (幼儿园)
- 金币: 2309.7
- 帖子: 545
- 在线: 205.3小时
- 虫号: 1463653
- 注册: 2011-10-27
- 性别: GG
- 专业: 自然语言理解与机器翻译
4楼2011-12-29 10:57:38
