source code clone download copy to clipboard report bug / make suggestion

1
2
3
4
5
6
7
8
9
10
program circle
      integer r, area
 
      write (*,*) 'Give radius r:'
      read  (*,*) r
      area = 3.14159*r*r
      write (*,*) 'Area = ', area
 
      stop
      end

clone download copy to clipboard

• upload with new input
  You have reached a limit of free submissions this month.
  You cannot send submissions this month anymore because of exceeding your monthly limit. Please recharge your account.
  
• # 2:   hide show   clone   input   131 days 22 hours ago    Runtime error

  result: Runtime error     time: 0.01s    memory: 2620 kB     signal: -1

  input:

  5

  output:

   Give radius r:
  

  stderr:

  At line 5 of file prog.f95 (unit = 5, file = 'stdin')
  Fortran runtime error: End of file
  

• # 1:   hide show   clone   input   131 days 22 hours ago    Runtime error

  result: Runtime error     time: 0.02s    memory: 2620 kB     signal: -1

  input: no
  output:

   Give radius r:
  

  stderr:

  At line 5 of file prog.f95 (unit = 5, file = 'stdin')
  Fortran runtime error: End of file