perm filename HAVOC.F4[1,VDS] blob sn#010358 filedate 1972-04-11 generic text, type T, neo UTF8
00100	1	TYPE 5
00200		ACCEPT 10,A
00300		TYPE 7
00400		ACCEPT 10,B
00500		C=A/B
00600		TYPE 9, C
00700	5	FORMAT (1H0,' A='$)
00800	7	FORMAT (' B='$)
00900	9	FORMAT (' C=',F)
01000	10	FORMAT(F)
01100		GO TO 1
01200		END