data fw13p04; title 'Ch 13, exercise 4'; input DIET $ WEIGHT; cards; REG 831 REG 858 REG 833 REG 860 REG 922 REG 875 REG 797 REG 788 NEW 870 NEW 882 NEW 896 NEW 925 NEW 842 NEW 908 NEW 944 NEW 927 NEW 965 NEW 887