Data update

Task/Conditional-structures/Ada/conditional-structures-2.adb

@@ -0,0 +1,13 @@
+type Operation is (Add, Subtract, Multiply, Divide);
+Op : Operation;
+Result : Integer;
+-- we assume that A and B are inputs.
+Result := (if Op = Add then
+  A + B
+elsif Op = Subtract then
+  A - B
+elsif Op = Multiply then
+  A * B
+elsif Op = Divide then
+  A / B
+);