RosettaCodeData/Task/Associative-array-Creation/PascalABC.NET/associative-array-creation.pas

8 lines
143 B
ObjectPascal

begin
var zoo := new Dictionary<string,integer>;
zoo['crocodile'] := 2;
zoo['jiraffe'] := 3;
zoo['behemoth'] := 1;
zoo.Println;
end.