1、关于codeblocks IDE的极速安装请参考百度经验<<Windows下极速搭建fortran开发环境>>
2、编辑代码源文件,输入:program main implicit none real*8::a,b,c,x1,x2 !输入a,b,c print *, "please input a, b, c" read *, a, b, c x1=(-b+sqrt(b*b-4*a*c))/(2*a) x2=(-b-sqrt(b*b-4*a*c))/(2*a) !打印结果 print *, "result: ",x1, x2end
3、编译、运行,得结果: