21
4
0
熟手
0%KRR]R`MJTKE1X3T54W6HO.png (1.06 KB, 下载次数: 0)
下载附件
2015-8-13 18:26 上传
输出效果
使用道具 举报
臭石头雪球
2033
12
5
论坛跑堂
Program www_fcode_cn Implicit None real :: xsec(3,3) = 569629.1, ysec(3,3) = 3196640. , z(3,3) = 230. integer :: i = 1 , j = 1 Write( * , 100 ) xsec(i,j), nint(ysec(i,j)) , z(i,j) 100 format("Text Style Vv Justify MR ",f8.1,",",i7.7," 7.5 0 ",f6.2) End Program www_fcode_cn
fcode 发表于 2015-8-13 18:47 [mw_shl_code=fortran,true]Program www_fcode_cn Implicit None real :: xsec(3,3) = 569629.1, ysec( ...
无标题.png (71.47 KB, 下载次数: 0)
2015-8-13 19:16 上传
本版积分规则 发表回复 回帖后跳转到最后一页
颁发给完成“有规有矩”任务的网友
颁发给为Fcode网站捐赠的网友
颁发给在娱乐版上传了真实照片的女性网友
颁发给论坛热心帮助他人的网友
颁发给经认证的具有特殊贡献和地位的名人
颁发给注册后积极发言的新人
颁发给对本站有突出贡献的朋友
颁发给本站版主和管理
颁发给在娱乐版上传了真实照片的男性网友
颁发给论坛注册3年以上的网友
颁发给发帖量超过一定数量的坛友
捐赠本站|Archiver|关于我们 About Us|小黑屋|Fcode ( 京ICP备18005632-2号 )
GMT+8, 2024-12-24 21:57
Powered by Tencent X3.4
© 2013-2024 Tencent