windows平台下fortran编程实现求最小值
工具/原料
codeblocksIDE编程环境
方法/步骤
1、关于codeblocksIDE的极速安装请参考百度经验<<Windows下极速搭建fortran开发环境>>
2、fortran胆咣骜岱编程实现求最小值源代码如下：implicitnoneinteger::i,j,Nreal*8::x(8)real*8::tmpx=[12,泌驾台佐39,499,20,3,1999,888,8]N=size(x)tmp=x(1)doi=1,Nif(x(i)<tmp)thentmp=x(i)endifenddoprint*,"最小值为：",tmp
3、编译、运行、结果如下：
