Data commit

2023-07-01 11:58:00 -04:00 · 2023-07-01 11:58:00 -04:00 · cb5bb5e222
commit cb5bb5e222
parent 7387c8f97b
199093 changed files with 3378972 additions and 0 deletions
--- a/Task/FizzBuzz/Delphi/fizzbuzz.delphi
+++ b/Task/FizzBuzz/Delphi/fizzbuzz.delphi
@ -0,0 +1,21 @@
+program FizzBuzz;
+
+{$APPTYPE CONSOLE}
+
+uses SysUtils;
+
+var
+  i: Integer;
+begin
+  for i := 1 to 100 do
+  begin
+    if i mod 15 = 0 then
+      Writeln('FizzBuzz')
+    else if i mod 3 = 0 then
+      Writeln('Fizz')
+    else if i mod 5 = 0 then
+      Writeln('Buzz')
+    else
+      Writeln(i);
+  end;
+end.