RosettaCodeData/Task/Arithmetic-Integer/Frink/arithmetic-integer-1.frink

[a,b] = input["Enter numbers",["a","b"]]
ops=["+", "-", "*", "/", "div" ,"mod" ,"^"]
for op = ops
{
   str = "$a $op $b"
   println["$str = " + eval[str]]
}