program Quadraticr
integer A,B,C
print*,"This program computes for the roots of a polynomial"
print*,"Please input the coefficients of your polynomial A,B,and C,where A,B, and C is in the form AX^2+BX+C "
read*, A,B,C
print*,"You have inputed:"
print*, A,"X^2+",B,"X+",C,"=0"
call quad(A,B,C)
end...