50 paskal abcnet дан массив чисел,вводимый в ручную ,найти значение максимального элемента и определить их
285
350
Ответы на вопрос:
Pascalabc.net 3.4.2, сборка 1884 от 24.11.2018 внимание! если программа не работает, обновите версию!
begin
var a : = readarrinteger(readinteger('n='));
var max : = a.max;
var i : = a.indexesof(t -> t = max).toarray;
print('максимум, равный', max, 'у элемента(-ов) номер');
i.select(t -> t + 1).println(', ')
end.
пример n= 15 -13 16 6 -12 -14 4 -12 -12 12 6 -10 2 16 -7 8 максимум, равный 16 у элемента(-ов) номер 2, 13program for_znanijacom;
const м = 100;
var mas : array[1..m] of integer;
i, max, k, n : integer;
begin
write('bbeдиte размер массива n = ');
readln(n);
write('bbeдиte элемент массива ');
readln(mas[1]);
max : = mas[1];
k: =1;
for i : = 2 to n do
begin
write('bbeдиte элемент массива ');
readln(mas[i]);
if max< mas[i] then
begin
max : = mas[i];
k: = 1
end
else
if max = mas[i] then к : = k+1;
end;
writeln('max =', max, 'этих элементов', к)
end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
ДжонниМультяшка13.01.2022 23:34
-
AhhaYakovkeva12.02.2021 02:08
-
daruapolo03.01.2021 04:51
-
CloudySun05.05.2022 15:33
-
sellvladklim00oy13em25.12.2020 17:53
-
Perchyn060122.07.2021 20:52
-
alikhankoshpanov31.08.2022 19:46
-
kazbekkhatitow7h5207.10.2020 16:02
-
Alferd23.06.2021 14:04
-
maksim2244103.01.2022 18:45
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.