RosettaCodeData/Task/Copy-a-string/Ada/copy-a-string-2.ada

Src : String := "Rosetta Stone";
Dest : String := Src(1..7); -- Assigns "Rosetta" to Dest
Dest2 : String := Src(9..13); -- Assigns "Stone" to Dest2