| 查看: 2155 | 回复: 3 | |||
| 当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖 | |||
[交流]
【求助】fortran出错了
|
|||
|
本人刚开始学fortran 想请教大家一下下面的程序哪个地方错了 老是提示 E:\Text1.f90(10): error FOR3351:inconsistent usage of KBC detected between A and ) E:\Text1.f90(14): error FOR3351: inconsistent usage of KBC detected between A and ) E:\Text1.f90(18): error FOR2290: implicit type for YC detected between YC and - E:\Text1.f90(18): error FOR2290: implicit type for XC detected between XC and - E:\Text1.f90(22): warning FOR4265: symbol XC referenced but not set E:\Text1.f90(22): warning FOR4265: symbol KAC referenced but not set E:\Text1.f90(22): warning FOR4265: symbol YC referenced but not set E:\Text1.f90(22): warning FOR4270: unused symbol LBE 程序是如下 implicit none real :: x1, y1, x2, y2, x3, y3, a, b, kab, kbc, xe print *, " input the parameters " read(*, *)x1, y1, x2, y2, x3, y3, a, b kab = (y2-y1)/(x2-x1) kbc = (y3-y2)/(x3-x2) kab = (y3-y1)/(x2-x1) xe = (y2-b+kab*a-kbc*x2)/(kab-kbc) write (*, *) xe end 谢谢各位 |
» 猜你喜欢
浙江师范大学是怎么坑我的
已经有15人回复
浙江师范大学是怎么坑我的
已经有4人回复
闲聊
已经有6人回复
求教各位大神:2026教育部人文社科青年基金项目何时公示呀?
已经有6人回复
面上有专家说实验设备不是我们单位的
已经有8人回复
科研求助
已经有4人回复
» 本主题相关价值贴推荐,对您同样有帮助:
【求助】求fortra程序
已经有4人回复
» 抢金币啦!回帖就可以得到:
诚征女友
+1/490
华南理工大学 光电材料方向 王竣可教授课题组招聘博士后、博士生及科研助理
+5/470
坐标北京,诚征女友,奔结婚,非诚勿扰!
+5/360
材料理论模拟或理论计算的作用有多大
+1/198
急招科研助理/博士后
+2/134
美国肯塔基大学Dr. Sheng Tong博士后招聘(空间可控的基因组编辑与肿瘤免疫治疗)
+1/97
各位大佬帮忙分析一下面上意见,是否上会?几个A、B、C?
+1/80
【推免】】中科院国家级人才团队招收27级推免硕士生
+1/78
中科院化学所韩布兴院士团队诚聘光催化、光酶催化、光电催化领域博士后1-2名
+1/78
山东征女友,坐标济南
+1/38
石河子大学211双一流学科分子筛等多孔材料与生物质资源化利用方向招2027级推免生
+1/35
坐标天津,诚征女友,希望遇到有缘之人。
+1/29
27博士申请自荐
+1/26
中国科大-合肥国家实验室冷原子量子网络团队招聘启事
+2/26
深圳大学2027级光电信息工程/物理学研究生推免
+1/17
【特刊征稿】BM临床诊断与治疗生物功能材料专题(Scopus、DOAJ 收录)
+1/8
口腔特刊客座招募客编Biofunctional Materials牙科生物功能材料专题,Scopus期刊
+1/7
广东省智能院与澳门大学、澳门科技大学、澳理工联合培养博士招生
+1/3
哈工大(深圳)招收工程热物理专业2027入学博士生
+1/3
招聘材料计算,分子动力学模拟相关讲师
+1/2
3楼2011-03-30 18:52:45
2楼2011-03-30 18:46:01
4楼2011-03-30 19:21:48









回复此楼