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

Вопрос школьника по предмету Информатика

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

Ответ учителя по предмету Информатика

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.