like this...: @A INPUT"FIRST #";A INPUT"SECOND #";B INPUT"SIGN";A$ IF A$=="-"THEN PRINT A-B IF A$=="×" THEN PRINT A*B IF A$=="+" THEN PRINT A+B IF A$=="÷" THEN PRINT A/B GOTO @A