RosettaCodeData/Task/Arithmetic-Integer/Picat/arithmetic-integer.picat
2023-07-01 13:44:08 -04:00

7 lines
167 B
Text

main =>
X = read_int(),
Y = read_int(),
foreach (Op in [+,-,*,div,rem])
R = apply(Op,X,Y),
printf("%d %w %d = %d\n", X, Op, Y, R)
end.