Пожалуйста!!!Задано массив c(8). Вычислить величину R по формуле R = PA + PB + PC, где...

Question

Пожалуйста!!!Задано массив c(8). Вычислить величину R по формуле R = PA + PB + PC, где PA,PB,PC - максимальные элементы массивов. Pascal.

Comments

"Задан массив c(8)". ОДИН массив! Соответственно, ОДИН максимальный элемент. Откуда возьмутся остальные два?

---

создать рандомные

---

А с массивом с(8) что делать?

---

это, вроде как и есть массив pc

---

А сразу всё объяснить было лень? Вы просите написать за Вас программу, а сами небрежно, "левой ногой" даёте условие...

---

Даже сейчас не ясно, откуда возьмётся массив с: надо ли его вводить, если надо, то откуда (клавиатура, файл), или можно его задать прямо в теле программы, как массив констант.

---

задать прямо в теле программы, как массив констант

Answer 1

//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.