languages_and_translators/final_lang/test2.fort

6 lines
No EOL
84 B
Text

program test
integer :: a, b
real :: c
a = 2 + 4 * (2 + 1) / 3 * b
b = a
end program