Решите задачу на языке Pascal.
Дано 3 числа. Найти суму двух наибольших из них.

Предыдущий
вопрос Следующий
вопрос

program SumOfMaxNumbers;

var
a, b, c, sum: integer;

begin
writeln('Enter three numbers:');
readln(a, b, c);

sum := a + b + c - Min(Min(a, b), c);

writeln('Sum of two largest numbers is: ', sum);
end.