program different data types
character name*20
integer roll
real avgmarks
Write(*,*)'Enter the name :'
read(*,*)name
write(*,*)'Enter roll'
read(*,*)roll
write(*,*)'Enter average marks'
read(*,*)avgmarks
Write(*,*)'Following are the details you entered'
write(*,*)'Name :',name
write(*,*)'Roll :',roll
write(*,*)'Average Marks :',avgmarks
end