program read1
        integer a,b
        real i,j 
 10	print *, ' Enter values for a, b, i and j:'
C We will deliberately try to read wrong values to see what happens'
	read *, a, b, i, j
        x = i/j
	print *, ' i = ', i, '; j = ', j, '; x = ', x
	goto 10
	end