24小时热门版块排行榜    

查看: 286  |  回复: 0
【悬赏金币】回答本帖问题,作者zanis将赠送您 5 个金币

zanis

新虫 (初入文坛)

[求助] 请问这段程序是怎么执行的?

DO 10 I=1,N
        C=A-RJ(I)/B
        C1=SQRT(1.-C*C)
        IF(C) 6,7,7
7     FJ(I)=ASIN(C1)
      GOTO 10
6     FJ(I)=3.14159265-ASIN(C1)
10    CONTINUE
      RETURN
        END

发自小木虫Android客户端
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 zanis 的主题更新
不应助 确定回帖应助 (注意:应助才可能被奖励,但不允许灌水,必须填写15个字符以上)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[论文投稿] EI学报,一审返修后,为啥不再送审,直接终审中? 10+4 qweasd12345 2024-05-27 6/300 2024-05-29 00:02 by dut_ameng
[基金申请] 山东省基金:作为项目负责人承担面上项目数量累计不得超过2项 +13 未岸亡灵 2024-05-23 27/1350 2024-05-28 22:02 by andywei1028
[教师之家] 被惯着的学生终究要吃大亏 +28 535743368 2024-05-24 30/1500 2024-05-28 21:51 by lyfbangong
[考博] 24年博士招生 +5 abinit432 2024-05-27 6/300 2024-05-28 20:34 by 中国银河
[基金申请] 讨论贴:好本子一定会被打招呼的淘汰吗 +28 ioe3937 2024-05-27 35/1750 2024-05-28 18:32 by ducan21
[论文投稿] 核心初审被拒,理由是“选题的意义不明确,文章写得不像是科技论文”,怎么改 5+3 工藤雷花樱 2024-05-27 7/350 2024-05-28 15:28 by 工藤雷花樱
[硕博家园] 文科博在木虫上存在感好低呀 +8 hahamyid 2024-05-25 11/550 2024-05-28 15:28 by cqu_zzh
[有机交流] 机理求助 200+4 15147165026 2024-05-26 10/500 2024-05-28 14:42 by 江东闲人
[论文投稿] Neurocomputing 外审结束 +7 mollyzhang_2003 2024-05-23 7/350 2024-05-28 13:53 by keyaner23
[硕博家园] 要不要读博 +13 王乔木 2024-05-24 14/700 2024-05-28 13:31 by 905452934
[材料综合] 求助,刚入门MOF合成,实验总是失败 20+3 张月半 2024-05-25 8/400 2024-05-28 09:20 by 我想更懂你29
[基金申请] 面上基金会评专家,有回避机制吗? +4 huang1991js 2024-05-27 4/200 2024-05-27 19:08 by 星火12
[基金申请] 科研之友阅读量近一周增加了200多。 +13 hdzw9071 2024-05-24 14/700 2024-05-27 17:29 by leeeru
[基金申请] 函评什么时候结束 +9 阿呆不呆 2024-05-23 10/500 2024-05-27 15:51 by zsy4657608
[硕博家园] 好奇博士每天学习的有效时间 +7 hahamyid 2024-05-25 7/350 2024-05-27 10:26 by mkpooooo
[基金申请] 化学口面上 +7 乐丰松庆 2024-05-23 17/850 2024-05-27 10:23 by ddr6021023
[论文投稿] 共同通讯谁投稿? +3 qvhm2609 2024-05-23 10/500 2024-05-26 13:25 by bobvan
[论文投稿] 真是奇怪的编辑部? +5 jjdg 2024-05-23 5/250 2024-05-25 21:57 by cqu_zzh
[教师之家] 经常觉得挺累的 +13 zylfront 2024-05-22 19/950 2024-05-25 21:08 by hjc404
[论文投稿] materials letter +4 烟雨盛世 2024-05-24 4/200 2024-05-25 02:07 by 1872075
信息提示
请填处理意见