PERIMETER
(147)? "WHAT IS THE PERIMETER?";P] "WHAT IS THE LENGTH?";L# L P2 "TOO LONG": 30(W (P2L)2: A LW2 "LENGTH" , "WIDTH" , "AREA"< L, W, AF "PERIMETER = ";PP:"PRINT ANSWER?";Y$ Z (Y$,1) "Y" 1302 d: "TRY AGAIN?(Y/N)";Y$K n (Y$,1) "Y" 10Q x[ 3,4r "PRINTING ANSWER" 3,"LENGTH" , "WIDTH" , "AREA" 3,L, W, A 3,"PERIMETER =";P 3 100