DATA

 !Name of the program: DATA

!Examples of data

Implicit none

!maximum integer value

Integer :: A

Integer (kind=2) :: B      !it uses two bytes

Integer (kind=4) :: C      !it uses four bytes

Integer (kind=8) :: D      !it uses eight bytes

print *, huge(A), kind(A)  !it shows 2147483647

print *, huge(B), kind (B)  !it shows 32767     2

Print *, huge(C)          !it shows 2147483647      4

Print *, huge(D), kind (D)

!it shows 9223372036854775807    8

stop

end

Comentários

Postagens mais visitadas deste blog

RECURSIVE

HYDROGEN-RADIAL

RUNGE-KUTTA