fork download
  1. program kadai02_1
  2. implicit none
  3. real:: x, y, sum
  4. x = 1.234
  5. y = 5.5
  6. sum = x + y
  7. print *, "sum of ", x, " and ", y, " is ", sum
  8. end program kadai02_1
Success #stdin #stdout 0.01s 5280KB
stdin
Standard input is empty
stdout
 sum of    1.23399997      and    5.50000000      is    6.73400021