Here's a calculator program in Fortran: ```fortran program calculator implicit none real :: num1, num2, result character :: op integer :: ios logical :: valid do prin