Срочно помогите Дан массив а(10), заполненный датчиком случайных чисел. Найти...

Question

Срочно помогите Дан массив а(10), заполненный датчиком случайных чисел. Найти наибольший элемент массива и возвести его в квадрат.

Comments

просто много кто тут отвечает не по теме

---

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

---

Я не сомневаюсь, и отвечают и спрашивают не по теме

---

Максимальный и минимальный элемент массива. Комбинированный тип данных. «Решение задач на поиск минимального и максимального элемента массива. Сортировка массива.»

---

я надеюсь сейчас вас правильно поняла ?

---

Пришлите пример какой то программы какую вы делали\здавали. Есть много языков программирования и трудно угадать какой вам нужен

---

Рассмотрим программу нахождения наибольшего и наименьшего элементов массива.

Program Premier-liga;

Var B: array[1..16] of integer;

MaxB,MinB,Nmax,Nmin,I: integer,

Begin

{Ввод названий команд и набранных ими очков}

Writeln(‘Введите полученные очки команд’)

For I:=1 to 16 do

Begin

Write(’Очки: ’); Readln(B[I])

End;

{Поиск наибольшего и наименьшего значений и их номеров}

MaxB:=B[1]; Nmax:=1; MinB:=B[1]; Nmin:=1;

For I:=2 to 16 do

B[I];

Nmax:=I

End;

{Выбор минимума}

If B[I]<="" span="">

Begin MinB:=B[I];

---

программу на языке Pascal.

---

да это паскаль, сейчас сделаю

---

Спасибо большое

Answer 1

Ответ:

Объяснение:

var arr : array[1..10] of Integer;

   max, i  : Integer;

begin

randomize;

for i := 1 to 10 do arr[i] := Random(100) - 50;

max := arr[1];

for i := 2 to 10 do if arr[i] > max then max := arr[i];

writeln('max = ', max);

writeln('max^2 = ',max * max);

end.

Comments

Спасибо большое )))