Question

Даны три числа. Определить сумму двух наибольших чисел из набора.

Answer 1

begin
  var a:=Seq(1,3,6);
  Writeln(a);  
  Writeln((a.SplitAt(2).Item1).Max+((a.SplitAt(2).Item1).Max+a.SplitAt(2).Item2).Max);
end.