😮Fortran--命名if代码块

name : if...then...end if

program nameIf
    implicit none
    real :: marks
    
    marks = 90.04
    
    gr: if(marks > 90.0) then
        print *,"Grade A"
    end if gr
    read *
end program nameIf

结果：

result_nameIf.png