Program to find the area of the right triangle

C      Program to find the area of the right triangle
        write(*,*)'Enter the base and width of the triangle:'
        read(*,*)a,b
        c=0.5*a*b
        write(*,*)'The area of the triangle is:',c
        end