DM 'LOG;CLEAR;OUT;CLEAR';
OPTIONS PAGENO = 1 LINESIZE = 74 PAGESIZE = 64;

data chisq;
	n+1;
	do row = 1 to 2;
		do col = 1 to 2;
			input count @;
			output;
		end;
	end;
datalines;
10 20 30 40
;
proc freq data=chisq;
	tables row*col / chisq;
	weight count;
run;