RosettaCodeData/Task/Arithmetic-Integer/PHL/arithmetic-integer.phl

20 lines
423 B
Plaintext

module arith;
extern printf;
extern scanf;
@Integer main [
@Pointer<@Integer> a = alloc(4);
@Pointer<@Integer> b = alloc(4);
scanf("%i %i", a, b);
printf("a + b = %i\n", a::get + b::get);
printf("a - b = %i\n", a::get - b::get);
printf("a * b = %i\n", a::get * b::get);
printf("a / b = %i\n", a::get / b::get);
printf("a % b = %i\n", a::get % b::get);
printf("a ** b = %i\n", a::get ** b::get);
return 0;
]