计算材料学——3
材料
例题 例 求前N个自然数倒数和。即求
PROGRAM MAIN IMPLICIT NONE INTEGER N,I REAL T,S READ *,N S=0.0; I=1 DO T=1.0/I S=S+T I=I+1 IF(I>N)EXIT END DO PRINT *,"SUM=",S END PROGRAM MAIN
程序需要几个变量：累加的项数 I(整型),存放通项值的T(实型),存 放总和的S(实型),待输入的总项数 N(整型)。
程序的运行结果如下 15 SUM= 3.182290
用DO结构处理循环问题，最关键的 是要处理好初值、循环终止条件和循环体 语句的关系。
你可能喜欢
- 科学计算
- 密度泛函理论
- 材料力学基础
- 计算物理
- 研究进展
- 生产工艺
- 材料科学
- 科学计算2页
- 科学计算器12页
- MATLAB与科学计算166页
- 科学与工程计算平时作业题及答案22页
- 初一科学《速度的计算》3页
- Matlab科学计算33页
- DFT密度泛函理论简介28页
- DFT 密度泛函理论 PPT 课件 教程38页
- 氢卟啉, N-Neo-混杂卟啉结构和吸收光谱性质的密度泛函理论研究5页
- 基于密度泛函微扰理论的砷化镓电光张量研究52页
- 密度泛函理论研究ScnO(n=1—9)团簇的结构、稳定性与电子性质7页
- 密度泛函理论2页
- 复合材料及其力学基础84页
- 第四章 材料力学基础22页
- 南京理工大学考研真题材料力学设计基础1页
- 南京理工大学考研真题材料力学计算机专业基础9页
- 材料力学基础(03-研)40页
- 材料力学概念及基础知识1页
- 11-12上学期计算物理考试题目6页
- 计算物理的课后题解答3页
- 计算物理专业博士研究生3页
- 计算物理总结32页
- 计算物理授课计划1页
- 计算物理课件1-3章55页
- 氧化铝生产工艺设备15页
- 保健食品生产工艺研究-张保献40页
- 钢化玻璃及其生产工艺6页
- 锂电池生产工艺8页
- pcb板生产工艺说明书2页
- 酱油的生产工艺46页
- 材料科学与工程前沿小结4页
- 材料科学导论英文前言67页
- 材料科学基础第一章习题答案15页
- 材料制备科学基础教学大纲101页
- 材料科学与工程专业英语2页
- 华中 材料科学与工程学院招生目录12页
