Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.60/5: Рейтинг темы: голосов - 5, средняя оценка - 4.60
 Аватар для *Angell*
20 / 0 / 0
Регистрация: 12.10.2011
Сообщений: 34

Найти максимальный элемент массива B

01.12.2011, 15:26. Показов 963. Ответов 3
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Найти максимальный элемент массива B(15).
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
01.12.2011, 15:26
Ответы с готовыми решениями:

В целочисленном массиве M(n) найти максимальный элемент среди четных элементов массива и максимальный элемент
В целочисленном массиве M(n) найти максимальный элемент среди четных элементов массива и максимальный элемент среди нечетных элементов...

Найти максимальный элемент массива и его индекс. Максимальный элемент я нашел , не получается вывести индекс
var i,max: integer; x: array of integer; begin randomize; max:=x; for i:=1 to 5 do begin x:=trunc(11*random -5); write(x,'...

Определить максимальный элемент массива В и его порядковый номер, замените максимальный элемент массива нулём
Массив: В(К); Условия и ограничения: в i>0, N<=30 Помогите пожалуйста

3
32 / 32 / 30
Регистрация: 25.11.2011
Сообщений: 43
01.12.2011, 16:00
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
uses crt;
var b:array [1..15] of integer;
i,max:integer;
begin
for i:=1 to 15 do
read(b[i]);
max:=b[i];
for i:=1 to 15 do
if max<b[i] then
max:=b[i];
writeln(max);
readln;
end.
0
 Аватар для Кевоин_прогин)
106 / 14 / 12
Регистрация: 26.11.2011
Сообщений: 22
01.12.2011, 16:13
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
uses crt;
var b:array[1..15] of integer;
i,max:integer;
begin
for i:=1 to 15 do
begin
write('Ââåäèòå, ',i,' ýëåìåíò ');
readln(b[i]);
end;
max:=b[1];
for i:=1 to 15 do
if b[i]>max then max:=b[i];
writeln('Ìàêñèìàëüíûé ýëåìåíò ' ,b[i]);
end.
0
 Аватар для *Angell*
20 / 0 / 0
Регистрация: 12.10.2011
Сообщений: 34
01.12.2011, 17:38  [ТС]
спасибки))
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
01.12.2011, 17:38
Помогаю со студенческими работами здесь

Найти максимальный элемент массива, вывести его индекс. Найти среднее арифметическое элементов массива
Найти максимальный элемент массива, вывести его индекс. Найти среднее арифметическое элементов массива.

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

Найти максимальный элемент массива
Завтра зачет ,а я не могу сделать 3,4,5 задание помогите!!!

Найти максимальный элемент массива
Найти максимальный элемент массива.

Найти максимальный элемент массива
Ребята помогите пж реализовать программу ломаю голову не могу понять как: дан одномерный массив надо найдти максимум. Как необходимо...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Новые блоги и статьи
Видеокарта простаивает ночами? Вот 4 проекта, которые загрузят её наукой
Programma_Boinc 10.04.2026
Видеокарта простаивает ночами? Вот 4 проекта, которые загрузят её наукой Если на Windows стоит дискретная NVIDIA или AMD — можно отдать её вычислительную мощность реальным исследованиям. . . .
Очистка реквизитов документа при копировании
Maks 09.04.2026
Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .
модель ЗдравоСохранения 8. Подготовка к разному выполнению заданий
anaschu 08.04.2026
https:/ / github. com/ shumilovas/ med2. git main ветка * содержимое блока дэлэй из старой модели теперь внутри зайца новой модели 8ATzM_2aurI
Блокировка документа от изменений, если он открыт у другого пользователя
Maks 08.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в конфигурации КА2. Задача: запретить редактирование документа, если он открыт у другого пользователя. / / . . .
Система безопасности+живучести для сервера-слоя интернета (сети). Двойная привязка.
Hrethgir 08.04.2026
Далее были размышления о системе безопасности. Сообщения с наклонным текстом - мои. А как нам будет можно проверить, что ссылка наша, а не подделана хулиганами, которая выбросит на другую ветку и. . .
Модель ЗдрввоСохранения 7: больше работников, больше ресурсов.
anaschu 08.04.2026
работников и заданий может быть сколько угодно, но настроено всё так, что используется пока что только 20% kYBz3eJf3jQ
Дальние перспективы сервера - слоя сети с космологическим дизайном интефейса карты и логики.
Hrethgir 07.04.2026
Дальнейшее ближайшее планирование вывело к размышлениям над дальними перспективами. И вот тут может быть даже будут нужны оценки специалистов, так как в дальних перспективах всё может очень сильно. . .
Горе от ума
kumehtar 07.04.2026
Эта мне ментальная установка, что вот прямо сейчас, мол, мне для полного счастья не хватает (нужное вписать), и когда я этого достигну - тогда и полный кайф. Одна из самых сильных ловушек на пути. . . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru