第一问答网»论坛 › 中问网 › 问答 › FORTRAN用DO LOOP怎样求他的乘数，就好像S=1*2*3。。。N ...

FORTRAN用DO LOOP怎样求他的乘数，就好像S=123。。。N，

11 |

1 | 2012-11-19 15:29:47 | 显示全部楼层 |阅读模式

阶乘的算法，用一个循环就行了：program maininplicit noneinteger
:: N
!!! 阶乘的阶integer
:: ireal*8
:: ss = 1.0d0do i= 1, ns = s * dble(i)end doend...

使用道具举报

返回列表发新帖

千问

主题	0 回帖	4882万积分

论坛元老

Rank: 8 Rank: 8

积分: 48824836

加好友
发消息

回复楼主返回列表

问答

热门排行

1 lady gaga《Brown eyes》《no floods》钢琴谱
2 合肥寒假兼职哪里找？
3 八仙全传之八仙过海小芯为花龙点灯
4 载人宇宙飞船船阅读答案
5 哪里有《猪是的念来过倒》电子书？
6 作文:成长的烦恼
7 2010同方专转本基础班答案（内部教材）英语+计算机
8 数学算术法
9 2006年第一学期高中一年级期末考试试卷44&45题的答案急用～
10 他说我适合找个老实的男朋友
11 pes2009最新转会补丁
12 当什么课代表最好
13 戴尔笔记本驱动程序戴尔键盘驱动程序三星官网驱动下载
14 哪里可以买到蔡依林的《特务J》（内地版《爱情任务》）？
15 眉毛天生比较稀疏，也比较淡的人是不适合用魅可M.A.C Brow set眉毛定色定型膏？
16 武汉的达人请帮忙从武昌火车站到珞珈山国际酒店
17 诛仙游戏完整版下载
18 谁有耽美网王的《妄想症》啊
19 该唱哪首歌给自己喜欢的女生、
20 七年级数学题目（速求！！！见者速答）
21 怎样在朋友面前吻男友啊
22 常州市中考修改病句1954年，巴西
23 我问的创维21寸550是数字电视吗是不是以后不用加机顶盒了
24 湖南今年春节可以用电话订票不，电话是多少啊
25 不要你不要离开我这么好听的歌歌名是什么?
26 掌门人网通Dota工会
27 联想14寸性价比很高的手提电脑
28 VOB转成什么格式，既清晰容量又相对小？
29 新奇迹世界如何刷野兽ac守卫塞尔博德位置
30 为什么我们要学消防知识
31 怎样理解作者的合欢树情结
32 为何我的第一次没出血？
33 镜之边缘碎玻璃就卡
34 ss501真的与一起来看流星雨的四大男子同台比吗
35 九年级上册词五首各表达了什么思想感情?
36 诛仙刚开区一天时间怎么到3重？
37 急啊！小学五年级奥数，很简单的，可是怎么做？大哥大姐小妹求你们啦！
38 关于环保方面的名言
39 百度空间 png背景白色
40 我该咋办？
41 哈奇小镇镇长在哪
42 谁能在摩尔庄园送我礼物吖?
43 我家穿越火线cf一进房间不是卡住就黑频谁有办法好的给50分，说到做到
44 电脑版战神2卡机怎么办
45 huai ren
46 中山取消暂住证，但是我买拉车，又要暂住证怎么办才好？
47 《nobody》逗霸滴
48 鲁讯的<<雪>>与朱自清的<<春>>在描写上有何异同?
49 腰疼怎么治？
50 月光螺能炒菜吃么
51 1400元内,那款的显示器性价比高点啊??
52 数学相遇问题初中
53 求4道初一应用题
54 什么叫铁路项目风险包干费
55 GBA蜡笔小新宇宙大冒险各BOSS共有多少生命
56 天津西青区学校到北京西站，用什么交通工具好，价钱是多少？
57 蔷薇少女的同人格斗游戏哪有啊？
58 三洋公司不保修彩电，我该向哪里投诉？
59 PRL升级成功，在原来的手机里不能上网了！
60 女生身高175跳舞好看吗
61 军事高技术对国防的影响，谁能给一些好的分析？
62 AVA 战地之王！
63 欧美音乐
64 大自然的喜怒哀乐
65 河南省新乡市从河南机电高等专科学校怎么坐公交车去二院
66 象棋里道理是胡荣华强还是许银川强？
67 我能用花生壳软件让我每次上外网ADSL都变成固定IP吗？
68 如何分辨拍号
69 网娃乐园精灵
70 电脑间歇性无法上网
71 qq农场怎么喂胡萝卜
72 懂天津专升本的进，多谢！！
73 帮我翻译下这句话
74 终极一家里面的乌拉巴哈怎么念的
75 怎么样才能使自己变得外向，变得话多？
76 焦点为(2,0)(-2.0)且过点(-2,3)求双曲线标准方程
77 日本女生都是怎么化妆的阿？感觉眼睛超大，而且非烟薰妆，看起来也超自然。粉底打的也好自然呢！！
78 北京轻联富润连锁酒店前门店电话
79 大学选了不喜欢的专业还要继续学吗？
80 你好，可以问你在哪里培训的美容学习的？》
81 香港旅游
82 电脑这个配置怎么样
83 住了两年房子突然有很大油漆味
84 ELF写给SJ的歌
85 银川万达阿凡达票价多少
86 哪个品牌硒鼓好
87 植物的枝叶保持一定的形态，叶片舒展，这样有利于植物进行：
88 实况足球8
89 赛尔号用75级依依配合肉盾，怎么打尤纳斯
90 数学应用题
91 电脑怎么了，为什么老是重启，还老显示下面一段文字？
92 ThinkPad R400 2784A54是不是商务本？
93 造纸英文翻译。英语译汉语。其中coat是涂布的意思，是造纸的一个过程。
94 为什么土豆网上还没有海派甜心10 ？？？？
95 在国美买个空调,想换液晶电视能换么?
96 是美男啊新禹唱的我是傻瓜
97 浪漫庄园的三个小猪怎么来的，我买了一个养殖的祈神台要敬献什么呀
98 小规模纳税人企业国税都报什么报表啊
99 谁能邀请我的两个QQ号成黄钻？分我都给了。。
100 诺亚舟NP980换触屏的步骤？

FORTRAN用DO LOOP怎样求他的乘数，就好像S=1*2*3。。。N，

FORTRAN用DO LOOP怎样求他的乘数，就好像S=123。。。N，