Update ch04-00-if.md

Author: Euler-37

src/ch04-00-if.md

@@ -7,11 +7,20 @@ Fortran中使用条件语句`if(<condition>)then`来表示某条语句在满足
 当`if`结构中的语句**只有一行**时，可是省略`then`和`end if`,写为一行
 
 ``` fortran
-if (angle < 90) then
-    write(*,*)"锐角"
-end if
-!等价形式
-if(angle < 90) write(*,*)"锐角" 
+program main
+   implicit none
+   integer::angle=10
+   if (angle < 90) then
+      write(*,*)"锐角"
+   end if
+   !等价形式
+   if(angle < 90) write(*,*)"锐角" 
+end program main
+```
+``` sh
+$ fpm run
+ 锐角
+ 锐角
 ```
 - 在 if 结构中缩进代码是一种很好的做法，以使代码更具可读性。