Data update

2024-04-19 16:56:29 -07:00 · 2024-04-19 16:56:29 -07:00 · aec8ed51b6
commit aec8ed51b6
parent 0df55f9f24
1045 changed files with 18889 additions and 2777 deletions
--- a/Task/Conditional-structures/Ada/conditional-structures-9.ada
+++ b/Task/Conditional-structures/Ada/conditional-structures-9.ada
@ -1,9 +1,5 @@
-case Today is
-  when Monday =>
-     Compute_Starting_Balance;
-  when Friday =>
-     Compute_Ending_Balance;
-  when Tuesday .. Thursday =>
-     Accumulate_Sales;
-  -- ignore Saturday and Sunday
-end case;
+select
+  My_Task.Start;
+or
+  delay Timeout_Period;
+end select;