languages_and_translators/final_lang/test2.fort

6 lines
No EOL
84 B
Text

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