RosettaCodeData/Task/Collections/Pascal/collections-5.pas

var
  MyString: String;
begin
  MyString:= 'Some Text';
end;