uses Исполнители;

begin
  var посл := СлучайнаяПоследовательность(10);
  посл.Вывести;
  
  посл.Сумма.Вывести;
  
  var сумма := 0;
  foreach var знач in посл do
    сумма += знач;
  сумма.Вывести
end.