Как дописать программу по информатике? найти максимальный элемент и его номер? без всякой константы? типо такого: program aaa; var a: array[1..5] of integer; i, m, nom: integer; begin for i: = 1 to 5 do begin writeln('введите число',i, 'элемент'); readln(a[i]); end; m: = a[1]; for i: =1 to 5 do begin if a[i] then max; m: =a[i]; nom: =i; end; writeln('максимальное число',m, 'номер числа в массиве',nom); end.
130
279
Ответы на вопрос:
Program pm; var a: array[1..5] of integer; i,max: integer; begin max: =1; for i: = 1 to 5 do begin write('a[',i,'] = '); readln(a[i]); if a[max] < a[i] then max: =i end; writeln('max(a) = a[',max,'] = ',a[max]); end. пример работы программы: a[1] = 1 a[2] = 3 a[3] = 8 a[4] = 16 a[5] = 2 max(a) = a[4] = 16
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
jelenazeile15.02.2022 19:20
-
Yliana23999013.11.2020 16:17
-
anytka131217.06.2023 18:57
-
lahtina19545403.01.2021 21:57
-
dva4evskaja201p08ub414.12.2020 11:17
-
jsowiwbdjwi26.07.2021 19:39
-
NuznaPomojs09.04.2022 08:44
-
victorov11321.09.2021 04:47
-
saltanatkeneso14.09.2020 11:55
-
samatozenk27.11.2021 03:47
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.