example

! example having 8 lines

program A1ex1

implicit none

real, parameter :: Curr=1.2 , Resist=3.4

! start prg

write (unit=*,fmt=*) Curr , Resist , &

Curr*Resist

stop

end program A1ex1

Previous slide

Next slide

Back to first slide

View graphic version