**TI92P*econ189Rinflarat˜¥Z>() Prgm:clrio local x,a,y,b disp "Inflation rate":disp "CPI this year":Disp "minus CPI last yr":disp "divided by CPI last yr":disp "times 100":pause:clrio Disp "enter CPI this yr":input x:xa:clrio disp "enter CPI last yr":input y:yb:clrio disp "The inflation rate is" disp ((a-b)/b)100:pause:clrio EndPrgm äåÜ'i