Пожалуйста!!!
Задано массив c(8). Вычислить величину R по формуле R = PA + PB + PC, где PA,PB,PC - максимальные элементы массивов. Pascal.
Задано массив c(8). Вычислить величину R по формуле R = PA + PB + PC, где PA,PB,PC - максимальные элементы массивов. Pascal.
Answers & Comments
//PascalABC.NET
begin
var c := ArrRandom(8);
c.Println;
Sort(c);
c.Println;
var (PA, PB, PC) := (c[0], c[1], c[2]);
var R := PA + PB + PC;
Print(R)
end.