24小时热门版块排行榜    

查看: 557  |  回复: 6
当前主题已经存档。
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

jianchaoyv

金虫 (小有名气)

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

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

[ Last edited by jianchaoyv on 2009-4-10 at 21:31 ]
回复此楼

» 猜你喜欢

已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

吃木头

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

我有电子版pdf,不知道里面有没有你要的相关程序,我的邮箱chilixin_1985,如果需要我可以传给你!
7楼2009-05-24 09:14:17
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 7 个回答

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的回帖
普通表情 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 0703化学调剂 ,六级已过,有科研经历 +4 曦熙兮 2026-03-15 4/200 2026-03-15 18:01 by JourneyLucky
[考研] 289求调剂 +4 这么名字咋样 2026-03-14 6/300 2026-03-14 18:58 by userper
[考研] 255求调剂 +3 李嘉慧, 2026-03-12 4/200 2026-03-14 16:58 by 有只狸奴
[考研] 211本,11408一志愿中科院277分,曾在中科院自动化所实习 +3 Losir 2026-03-12 3/150 2026-03-14 12:11 by 热情沙漠
[考研] 330求调剂 +3 ?酱给调剂跪了 2026-03-13 3/150 2026-03-14 10:13 by JourneyLucky
[考研] 085600材料与化工 326 求调剂 +5 热爱生活ing 2026-03-09 5/250 2026-03-14 02:39 by JourneyLucky
[考研] 一志愿浙江大学0856材料与化工求调剂 +4 yansheng@211 2026-03-09 5/250 2026-03-14 02:10 by JourneyLucky
[考研] 333求调剂 +3 球球古力 2026-03-09 3/150 2026-03-14 01:57 by JourneyLucky
[考研] 0856材料与化工309分求调剂 +6 ZyZy…… 2026-03-10 6/300 2026-03-14 00:38 by JourneyLucky
[考研] 材料工程,326分,求调剂 +6 KRSLSR 2026-03-10 6/300 2026-03-13 23:47 by JourneyLucky
[考研] 332求调剂 +3 zjy101327 2026-03-11 6/300 2026-03-13 22:48 by JourneyLucky
[考研] 337一志愿华南理工0805材料求调剂 +7 mysdl 2026-03-11 9/450 2026-03-13 22:43 by JourneyLucky
[考研] 0703化学调剂 +4 快乐的香蕉 2026-03-11 4/200 2026-03-13 22:41 by JourneyLucky
[考研] 26调剂/材料/英一数二/总分289/已过A区线 +6 步川酷紫123 2026-03-13 6/300 2026-03-13 21:59 by 星空星月
[考研] 【考研调剂求收留】 +3 Ceciilia 2026-03-11 3/150 2026-03-13 20:18 by JourneyLucky
[考研] 求调剂 +5 一定有学上- 2026-03-12 5/250 2026-03-13 18:31 by ms629
[考研] 工科调剂 +4 Jiang191123! 2026-03-11 4/200 2026-03-13 15:15 by Miko19
[考研] 纺织、生物、化学、材料相关专业招生了 +4 耶耶业 2026-03-09 7/350 2026-03-12 19:05 by Equinoxhua
[考研] 294 英二数二物化 求调剂 +6 米饭团不好吃 2026-03-09 6/300 2026-03-09 23:55 by barlinike
[考研] 337求调剂 +3 睡醒,。 2026-03-09 3/150 2026-03-09 10:02 by 求调剂zz
信息提示
请填处理意见