CLS PRINT UCASE$("find the inlation rate for a particular") PRINT UCASE$("product. For example: milk, by") PRINT UCASE$("comparing the starting price") PRINT UCASE$("with the current/later price.") PRINT UCASE$("starting price: $"); : INPUT sp PRINT UCASE$("current price: $"); : INPUT ep percentage = ((ep - sp) / sp * 100) PRINT UCASE$("the inflation rate is: "); percentage; " percent"