This commit is contained in:
NoryiE
2025-02-10 06:00:28 +00:00
parent b0a4a6da9c
commit 71a1fce096
2428 changed files with 0 additions and 1005324 deletions

View File

@@ -1,22 +0,0 @@
with
Ada.Text_IO,
Ada.Integer_Text_IO;
use Ada;
procedure fizz_buzz is
begin
for i in 1..100 loop
if i mod 15 = 0 then
Text_IO.Put_Line("fizz buzz");
elsif i mod 5 = 0 then
Text_IO.Put_Line("buzz");
elsif i mod 3 = 0 then
Text_IO.Put_Line("fizz");
else
Integer_Text_IO.put(i, Width => 0);
Text_IO.New_Line;
end if;
end loop;
end fizz_buzz;
-- From https://github.com/kylelk/ada-examples/blob/master/fizz_buzz.adb