24小时热门版块排行榜    

查看: 263  |  回复: 2

zhangzhiguang

至尊木虫 (文坛精英)

[交流] 【求助】各位帮忙看一下这是什么语言写的程序? 已有2人参与

largest_label = 0;
for x in 0 to n_columns {
for y in 0 to n_rows {
   if occupied[x,y] then
     left = occupied[x-1,y];
     above = occupied[x,y-1];
     if (left == 0) and (above == 0) then
       largest_label = largest_label + 1;
       label[x,y] = largest_label;
     else {
       if (left != 0) {
         if (right != 0)
           union(left,above);
         label[x,y] = find(above);
       } else
       label[x,y] = find(right);
     }
   }
}


如果可以的话,能不能帮忙给转变成fortran形式的,如果不行能不能讲解一下每一步都在干什么?
回复此楼

» 猜你喜欢

好好学习,天天向上!
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

snoopyzhao

至尊木虫 (职业作家)

★ ★
zhangzhiguang(金币+1):谢谢参与
resonant(金币+1):指导费:-) 2010-08-09 18:26:57
这应该是假代码吧?结构很清楚,理解起来倒是不困难。

话说回来,如果你自己不能理解,别人翻译的代码你敢用吗?呵呵……
2楼2010-08-09 17:08:49
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zhangzhiguang

至尊木虫 (文坛精英)

我不太清楚他用的是什么语言,也不明白内容,这只是别人的提示,因为我对fortran较熟,所以翻译过来我自己可以看,或者给我解释一下我自己再变也可以
好好学习,天天向上!
3楼2010-08-09 17:12:09
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 zhangzhiguang 的主题更新
普通表情 高级回复 (可上传附件)
信息提示
请填处理意见