Срочно помогите
Дан массив а(10), заполненный датчиком случайных чисел. Найти наибольший элемент массива и возвести его в квадрат.
Anyutatorez1:
просто много кто тут отвечает не по теме
На каком языке програмирования, вы в каком разделе находитесь?
Я не сомневаюсь, и отвечают и спрашивают не по теме
Максимальный и минимальный элемент массива. Комбинированный тип данных. «Решение задач на поиск минимального и максимального элемента массива. Сортировка массива.»
я надеюсь сейчас вас правильно поняла ?
Пришлите пример какой то программы какую вы делали\здавали. Есть много языков программирования и трудно угадать какой вам нужен
Рассмотрим программу нахождения наибольшего и наименьшего элементов массива.
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];
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.
да это паскаль, сейчас сделаю
Спасибо большое
Ответы
Ответ дал:
2
Ответ:
Объяснение:
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.
Спасибо большое )))
Вас заинтересует
4 месяца назад
5 месяцев назад
5 месяцев назад
2 года назад
2 года назад
7 лет назад