March 2014 update

2014-04-02 16:56:35 +00:00 · 2014-04-02 16:56:35 +00:00 · a25938f123
commit a25938f123
parent 09687c4926
1846 changed files with 21876 additions and 5203 deletions
--- a/Task/Draw-a-sphere/Ada/draw-a-sphere-1.ada
+++ b/Task/Draw-a-sphere/Ada/draw-a-sphere-1.ada
--- a/Task/Draw-a-sphere/Ada/draw-a-sphere-2.ada
+++ b/Task/Draw-a-sphere/Ada/draw-a-sphere-2.ada
@ -0,0 +1,12 @@
+with Display; use Display;
+with Display.Basic; use Display.Basic;
+
+procedure Main is
+   Ball : Shape_Id := New_Circle
+     (X      => 0.0,
+      Y      => 0.0,
+      Radius => 20.0,
+      Color  => Blue);
+begin
+   null;
+end Main;