Data commit

Task/FizzBuzz/ABAP/fizzbuzz-1.abap

@@ -0,0 +1,13 @@
+DATA: tab TYPE TABLE OF string.
+
+tab = VALUE #(
+  FOR i = 1 WHILE i <= 100 (
+    COND string( LET r3 = i MOD 3
+                     r5 = i MOD 5 IN
+                 WHEN r3 = 0 AND r5 = 0 THEN |FIZZBUZZ|
+                 WHEN r3 = 0            THEN |FIZZ|
+                 WHEN r5 = 0            THEN |BUZZ|
+                 ELSE i ) ) ).
+
+cl_demo_output=>write( tab ).
+cl_demo_output=>display( ).

Task/FizzBuzz/ABAP/fizzbuzz-2.abap

@@ -0,0 +1,5 @@
+cl_demo_output=>display( value stringtab( for i = 1 until i > 100
+                                          let fizz = cond #( when i mod 3 = 0 then |fizz| else space )
+                                              buzz = cond #( when i mod 5 = 0 then |buzz| else space )
+                                              fb   = |{ fizz }{ buzz }| in
+                                         ( switch #( fb when space then i else fb ) ) ) ).