11 lines
155 B
Ada
11 lines
155 B
Ada
|
with Shapes.Circles; use Shapes.Circles;
|
||
|
|
use Shapes;
|
||
|
|
|
||
|
|
procedure Shapes_Main is
|
||
|
|
P : Point;
|
||
|
|
C : Circle;
|
||
|
|
begin
|
||
|
|
P.Print;
|
||
|
|
C.Print;
|
||
|
|
end Shapes_Main;
|