Ask Question

Name:
Title:
Your Question:

Answer Question

Name:
Your Answer:
User Submitted Source Code!


Description:
  s
Language: FORTRAN
Code:
PROGRAM Cember
IMPLICIT NONE
REAL :: R, Alan, Cevre
REAL, PARAMETER :: PI = 3.141593

  PRINT *,"Cemberin yaricapini girin: "
  READ *,R

  Alan = Pi * R**2
  Cevre = 2 * Pi *R

  PRINT *,"Alan  = ",Alan
  PRINT *,"Cevre = ",Cevre

END PROGRAM 
          
Comments: