[size=4]  [color=FF0000] 以下程序代码是我从书上看到，测试后通过了，希望对想学并行计算的同胞们有所帮助。本来打算不做这些热心的事，但一想，自己当初学习时何等的艰难，找并行计算的程序代码是何等的艰辛，一来感觉同是天涯沦落人，二来起到一个抛砖引玉，希望长江后浪推前浪，知识只有共享才能进步，如果一个领域只有你一个人知道，那么这个领域离灭亡不远了，人们不会仰慕你，因为他们不懂这一行（本人的一点小感受），好了，费话就不多说了，中国的前途就看各位了！共同学习，共同提高！祝各位身体健康，合家欢乐！[/color][/size]

  [size=5][color=0000FF] 由于代码中含有本网站禁用的字符，不能直接贴出来，具体内容在以下邮箱中：

  邮箱名称： fortranIMSL@163.com

  密码：fortran123[/color][/size]

[color=008000][size=4]都21世纪了，都是有身份有素质的人，不要修改密码，不要带色东东和广告，有好的资源可以向这个邮箱传，不能下载不要骂人，可以发贴，我查找原因[/size]！[/color]
   运行后的结果：
 你的收入是1000.0
取出来了：800.0
又存进去：800.0
你的收入是1000.0
取出来了：800.0
又存进去：800.0
你的收入是1000.0
取出来了：800.0
又存进去：800.0
你的收入是1000.0
取出来了：800.0
又存进去：800.0
你的收入是1000.0
取出来了：800.0
又存进去：800.0
你的收入是1000.0
取出来了：800.0
又存进去：800.0
你的收入是1000.0
取出来了：800.0
又存进去：800.0
你的收入是1000.0
取出来了：800.0
又存进去：800.0
你的收入是1000.0
取出来了：800.0
又存进去：800.0
你的收入是1000.0
取出来了：800.0
又存进去：800.0