PPT Slide
! Ex with variable asnmt
program C02
implicit none
real,parameter::PI=3.14
real,parameter::R=4,H=5
real::Area,Volume,Radius,Heigth
integer,parameter::C=5
integer::Counts
!start
Radius=R
Heigth=H
Counts=C
write (unit=*,fmt=*) Radius,Heigth,Counts
stop
end program C02
Previous slide
Next slide
Back to first slide
View graphic version