@Reuel

hiper

September 23, 2022 · Fortran
program hiper
real m, t 

m=1
t=0.5

do while (t<=5) 

m=tanh(m/t)
t= t+1

program matriz.1

August 19, 2022 · Fortran
program matriz
implicit none 
integer*4, dimension (3,3) :: a 
integer*4, dimension (3)   :: b 
integer*4, dimension (4)   :: c 

a (1,1) = 1 
a (1,2) = 2 
a (1,3) = 3
a (2,1) = 4
a (2,2) = 5

gfortran fibonacci

August 04, 2022 · Fortran
program fibonacci 
       implicit none
       integer i, n, x0, x1, x2
       x0=1
       x1=1
       n=15
       print*, x0
       print*, x1
       
       do i=1, n 
       x2=x1+x0