RosettaCodeData/Task/Arithmetic-Integer/PascalABC.NET/arithmetic-integer.pas

11 lines
295 B
ObjectPascal

begin
var (a,b) := ReadInteger2;
Println($'{a} + {b} = {a + b}');
Println($'{a} - {b} = {a - b}');
Println($'{a} * {b} = {a * b}');
Println($'{a} / {b} = {a / b}');
Println($'{a} div {b} = {a div b}');
Println($'{a} mod {b} = {a mod b}');
Println($'{a} ** {b} = {a ** b}');
end.