Найти наибольший элемент числового массива A = (a1, a2 , ..., aN ) и его номер.
Ответы на вопрос:
Данные |
Результаты |
||
N=4 |
A=(3, -1, 10, 1) |
Amax=10 |
K=3 |
Исполнение алгоритма
i |
A[i] > Amax |
Amax |
k |
2 3 4 |
- + - |
3 10 |
1 3 |
Блок-схема
Turbo Pascal
Program MaxElem;
Uses Crt;
Type Mas = Array [1..20] of Real;
Var A : Mas;
i, N : Integer;
k : Integer;
Amax : Real;
BEGIN
СlrScr;
Write('Введите N = ');
ReadLn(N);
For i := 1 to N do {Ввод значений элементов массива А}
begin
Write('A [ ', i, ' ] = '); ReadLn(A[i])
end;
Amax := A[1]; k:=1; {Поиск максимального элемента}
For i := 2 to N do
If A[i] > Amax then
begin
Amax := A[i]; k := i
end;
WriteLn; WriteLn('Наибольший элемент' , k , '-й');
WriteLn('Его значение ', Amax : 5 : 1); ReadLn
END.
QBasic
CLS
INPUT "N = "; N : DIM A(N)
FOR i = 1 TO N ' Ввод массива А
PRINT "A("; i; ") = ";
INPUT A(i)
NEXT i
Amax = A(1) : k = 1 ' Поиск максимального элемента
FOR i = 2 TO N
IF A(i) > Amax THEN Amax = A(i) : k=i
NEXT i
PRINT "Наибольший элемент" ; k ; "-й"
PRINT "Его значение" ; Amax
END
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Другие предметы
-
Kika22832220.01.2021 05:10
-
turkmenochka7524.05.2020 01:24
-
КлубникО16.12.2021 04:48
-
vikfffff06.10.2022 13:53
-
Ok7a15.10.2022 03:36
-
shurik2302198322.09.2022 07:48
-
akyjla55117.04.2023 07:02
-
Polina7383773919.07.2021 13:58
-
nastya36842167822.02.2022 13:59
-
Farys20.09.2020 09:51
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.