| 查看: 2081 | 回复: 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 谢谢各位 |
回复此楼» 猜你喜欢
大龄残疾硕士的一点执念
已经有22人回复
-
在职考研
已经有4人回复
-
b口会评
已经有3人回复
-
2026年面上项目中了，2A+B, 会评顺利通过
已经有13人回复
-
生命口会评
已经有4人回复
-
今年E04面上
已经有20人回复
-
网络举报学术不端成为了男女之间情杀的手段了，真荒唐。。。
已经有3人回复
-
Suzuki偶联中硼酸酯原料掉下的硼酸酯是否可以自身偶联，生成B2Pin2杂质
已经有3人回复
-
刑法学论文投稿求助
已经有5人回复
-
Journal of Environmental Chemical Engineering
已经有3人回复
» 本主题相关价值贴推荐，对您同样有帮助:
- 【求助】求fortra程序
已经有4人回复
» 抢金币啦！回帖就可以得到:
-
宝宝起名
+1/473
-
27年入学博士招生（图像智能处理相关）
+1/180
-
化学所分子识别实验室公开招聘项目聘用人员
+1/84
-
化学所分子识别实验室公开招聘项目聘用人员
+1/80
-
工材学部会评时间知道么？
+1/60
-
中国医学科学院苏州系统医学研究所胡士斌课题组科研助理招聘
+1/45
-
澳门大学周胤宁课题组招收2027年8月入学博士生
+1/43
-
中国科学院赣江创新研究院李庭刚研究员团队招收与江西理工大学联合培养博士生
+1/34
-
上海交通大学-化学化工学院 博士后招聘
+1/33
-
耳石症，好好晕，好难受，有没有同道中人，支个招
+1/9
-
瑞典林雪平大学博士后招聘｜PEC Water Splitting 方向
+1/7
-
双一流高校招收博士（现代技术管理/环境技术经济管理）及硕士研究生（长期有效）
+1/6
-
圣路易斯华盛顿大学管建均教授课题组招聘博士后（2名）
+1/5
-
吉布斯自用能变、平衡常数、活度/分压计算
+1/4
-
北理工集成电路杰青团队 | 诚招科助理
+1/4
-
国家纳米中心招聘项目聘用研究助理
+1/4
-
清华大学韩军功教授课题组博士后招聘启事
+1/3
-
圣路易斯华盛顿大学管建均教授课题组招聘博士后（2名）
+1/2
-
力学研究所某专项团队支撑岗位和特别研究助理岗位招聘启事(长期有效)
+1/2
-
力学研究所某专项团队支撑岗位和特别研究助理岗位招聘启事(长期有效)
+1/2
4楼2011-03-30 19:21:48
2楼2011-03-30 18:46:01
3楼2011-03-30 18:52:45