8 lines
318 B
ObjectPascal
8 lines
318 B
ObjectPascal
begin
|
|
var d := Dict('бегемот'=>2,'попугай'=>3,'крокодил'=>1);
|
|
Println(d);
|
|
|
|
var Capital := Dict('Россия'=>'Москва','Франция'=>'Париж',
|
|
'Италия'=>'Рим','Германия'=>'Берлин');
|
|
Println(Capital['Италия'],Capital['Франция']);
|
|
end. |