24小时热门版块排行榜    

查看: 559  |  回复: 6
当前主题已经存档。

jianchaoyv

金虫 (小有名气)

[交流] 【求助】用Fortran 语言编程求满足麦克斯韦分布的初速度

有十个氢原子在300k温度下其初速度满足麦克斯韦速率分布,即正比与e的(-v**2/2mkT)次方,用FORTRAN语言编程求初速度?求程序!
本人没有一点思路,请高手指点一二,谢谢!!!

[ Last edited by jianchaoyv on 2009-4-10 at 21:31 ]
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

sprite2791

金虫 (小有名气)

★ ★
zt970831(金币+2):感谢您的交流
十个氧原子少了点.....
可以这样,产生随机数x,(均小于1),可以产生一个均匀分布的大的随机数,除以随机范围
ex:
random(10000),然后除以10000,得到小数
随后概率取exp(-x**2/2mkT)
随便想想的,希望有用......
2楼2009-04-04 06:25:13
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

jianchaoyv

金虫 (小有名气)

谢谢楼上的,初学编程进行计算,没看懂你的意思,能说的更明白点吗?
“产生随机数x,(均小于1),可以产生一个均匀分布的大的随机数,除以随机范围
ex:
random(10000),然后除以10000,得到小数”
怎样产生随机数?
3楼2009-04-04 11:29:23
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

ddx-k

荣誉版主 (著名写手)

骑士II


zt970831(金币+1):感谢您的交流
random 是fortran语言里面的一个命令,它的作用就是产生随机数。
4楼2009-04-04 13:50:19
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

jianchaoyv

金虫 (小有名气)

如果各位有谁方便,能否给发一个想关程序?本人实在无从下手
5楼2009-04-04 15:42:18
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

jianchaoyv

金虫 (小有名气)

顶 !!
6楼2009-04-05 09:17:01
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

吃木头

《Fortran常用算法程序集【徐士良】-第二版》

我有电子版pdf,不知道里面有没有你要的相关程序,我的邮箱chilixin_1985,如果需要我可以传给你!
7楼2009-05-24 09:14:17
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 jianchaoyv 的主题更新
普通表情 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 268求调剂 +5 一定有学上- 2026-03-14 6/300 2026-03-14 22:20 by 运气yunqi
[基金申请] 现在如何回避去年的某一个专家,不知道名字 +3 zk200107 2026-03-12 6/300 2026-03-14 17:13 by zk200107
[考研] 一志愿湖师大化学289求调剂 +6 XMCMM3.14159 2026-03-10 6/300 2026-03-14 00:28 by JourneyLucky
[考研] 材料与化工(0856)304求B区调剂 +6 邱gl 2026-03-12 7/350 2026-03-13 23:24 by 邱gl
[考研] 341求调剂 +4 番茄头--- 2026-03-10 4/200 2026-03-13 23:12 by JourneyLucky
[考研] 285 求调剂 资源与环境 一志愿北京化工大学 +3 未名考生 2026-03-10 3/150 2026-03-13 23:04 by JourneyLucky
[考研] 279求调剂 +3 Dizzy123@ 2026-03-10 3/150 2026-03-13 23:02 by JourneyLucky
[考研] 0703化学调剂 +4 快乐的香蕉 2026-03-11 4/200 2026-03-13 22:41 by JourneyLucky
[考研] [0860]321分求调剂,ab区皆可 +4 宝贵热 2026-03-13 4/200 2026-03-13 22:01 by 星空星月
[考研] 26调剂/材料科学与工程/总分295/求收留 +9 2026调剂侠 2026-03-12 9/450 2026-03-13 20:46 by 18595523086
[考研] 293求调剂 +3 世界首富 2026-03-11 3/150 2026-03-13 16:27 by JourneyLucky
[考研] 310求调剂 +3 【上上签】 2026-03-11 3/150 2026-03-13 16:16 by JourneyLucky
[考研] 考研调剂 +4 芬达46 2026-03-12 4/200 2026-03-13 16:04 by ruiyingmiao
[考研] 一志愿211化学学硕310分求调剂 +8 努力奋斗112 2026-03-12 9/450 2026-03-13 15:41 by JourneyLucky
[考研] 295求调剂 +3 小匕仔汁 2026-03-12 3/150 2026-03-13 15:17 by vgtyfty
[考研] 土木第一志愿276求调剂,科研和技能十分丰富,求新兴方向的导师收留 +3 土木小天才 2026-03-12 3/150 2026-03-13 15:01 by JourneyLucky
[论文投稿] 投稿问题 5+4 星光灿烂xt 2026-03-12 6/300 2026-03-13 14:17 by god_tian
[考研] 0856化工原理 +6 z2839474511 2026-03-10 6/300 2026-03-13 10:41 by houyaoxu
[考研] 求调剂 资源与环境 285 +3 未名考生 2026-03-10 3/150 2026-03-13 10:31 by houyaoxu
[考研] 0703化学调剂 +3 三dd. 2026-03-10 3/150 2026-03-10 15:45 by peike
信息提示
请填处理意见