Mailing List Archive: 49091 messages
  • Home
  • Script library
  • AltME Archive
  • Mailing list
  • Articles Index
  • Site search

[REBOL] let's re-visit math oper. in a var.

From: mumpsoid:gmx at: 3-Apr-2009 9:02

Hey.... REBOL [ title: "Calculator Program" author: "Duke Normandin" date: 30-March-2009 File: %myCalc.r version: 1.0.0 ] clrscrn: does [print "^(1B)[2J"] until [ clrscrn num1: ask "Enter the 1st number: " num2: ask "Enter the 2nd number: " op: ask "Enter an operator [+ - * /]: " op2: join ":" :op print reform ["result 1: " (to-integer num1) op (to-integer num2)] ;NO JOY.... print reduce ["result 2: " op num1 num2] ; NO JOY...... print ["result 3: " op2 num1 num2] ; NO JOY...... confirm "Are you done? Y/N: " ] What's wrong _now_........? -- Duke Normandin A: Because it messes up the order in which people normally read text. Q: Why is top-posting such a bad thing? A: Top-posting. Q: What is the most annoying thing in e-mail?