Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.94/18: Рейтинг темы: голосов - 18, средняя оценка - 4.94
0 / 0 / 0
Регистрация: 12.12.2016
Сообщений: 1

Заменить все элементы массива, поделив их на значение наибольшего элемента массива

12.12.2016, 13:35. Показов 3824. Ответов 2
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Дан массив A. Найти наибольший элемент. Заменить все элементы массива, поделив их на значение наибольшего элемента массива. Вывести исходный и результирующий массивы, значение и порядковый номер наибольшего элемента.
0
Лучшие ответы (1)
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
12.12.2016, 13:35
Ответы с готовыми решениями:

Все элементы массива поделить на значение наибольшего элемента
Все элементы массива поделить на значение наибольшего элемента этого массива.

Заменить на единицы все элементы массива, значения которых больше 3 , если максимальный элемент массива имеет значение от 0 до 5
Помогите пожалуйста решить 2 задачи... 1) Если сумма значений элементов с четным индексом в массиве М(15) равна произведению первого и...

Заменить все положительные элементы массива на значение минимального
Добрый День Помогите пожалуйста с задачей в паскаль.. 6.5. Заменить все положительные 1|отрицательные 2 элементы целочисленного массива...

2
57 / 57 / 114
Регистрация: 09.12.2016
Сообщений: 143
12.12.2016, 17:50
Лучший ответ Сообщение было отмечено Ainabayeva как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
const
m = 100;
var A:array[1..m] of real;
i, n, max_i: integer;
max:real;
procedure print_mas;
var i:integer;
begin
for i:=1 to n do
    write(A[i],' ');
writeln;
end;
begin
writeln('Введите размерность массива ');
readln(n);
for i:=1 to n do
    A[i]:=random(11);
writeln('Исходный массив:');
print_mas;
max_i:=1;
for i:=1 to n do
    if A[i] > A[max_i] then
        max_i:=i;
max:=A[max_i];
for i:=1 to  n do
    A[i]:=A[i]/max;
writeln('Итоговый массив:');
print_mas;
writeln('Максимальный элемент и его индекс: ', max, ' ', max_i)
end.
2
0 / 0 / 0
Регистрация: 12.12.2016
Сообщений: 3
12.12.2016, 18:06
Ainabayeva, привет
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
12.12.2016, 18:06
Помогаю со студенческими работами здесь

Заменить все отрицательные элементы массива на значение максимального
заменить все отрицательные элементы целочисленного массива, состоящего из n элементов, на значение максимального.

Заменить все элементы массива с отрицательным значением на значение минимального
Массив состоит из 20 случайных чисел в диапазоне от -100 до 100.Заменить все элементы с отрицательным значением на значение минимального не...

Все положительные элементы массива умножить на значение первого элемента
Дан массив а(10). Все положительные элементы массива умножить на значение первого элемента массива

Заменить все отрицательные элементы на среднее арифметическое значение элементов массива
ввести двухмерный массив A(N,N) Создать программу замены всех негативных элементов на среднее арифметическое значение элементов массива

Заменить все отрицательные элементы целочисленного массива размера 10 на значение максимального.
Заменить все отрицательные элементы целочисленного массива размера 10 на значение максимального. Заранее спасибо!


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

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Новые блоги и статьи
Подключение Box2D v3 к SDL3 для Android: физика и отрисовка коллайдеров
8Observer8 29.01.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .
Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT
bedvit 28.01.2026
Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .
Загрузка PNG с альфа-каналом на SDL3 для Android: с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 28.01.2026
Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .
Загрузка PNG с альфа-каналом на SDL3 для Android: с помощью SDL3_image
8Observer8 27.01.2026
Содержание блога SDL3_image - это библиотека для загрузки и работы с изображениями. Эта пошаговая инструкция покажет, как загрузить и вывести на экран смартфона картинку с альфа-каналом, то есть с. . .
Влияние грибов на сукцессию
anaschu 26.01.2026
Бифуркационные изменения массы гриба происходят тогда, когда мы уменьшаем массу компоста в 10 раз, а скорость прироста биомассы уменьшаем в три раза. Скорость прироста биомассы может уменьшаться за. . .
Воспроизведение звукового файла с помощью SDL3_mixer при касании экрана Android
8Observer8 26.01.2026
Содержание блога SDL3_mixer - это библиотека я для воспроизведения аудио. В отличие от инструкции по добавлению текста код по проигрыванию звука уже содержится в шаблоне примера. Нужно только. . .
Установка Android SDK, NDK, JDK, CMake и т.д.
8Observer8 25.01.2026
Содержание блога Перейдите по ссылке: https:/ / developer. android. com/ studio и в самом низу страницы кликните по архиву "commandlinetools-win-xxxxxx_latest. zip" Извлеките архив и вы увидите. . .
Вывод текста со шрифтом TTF на Android с помощью библиотеки SDL3_ttf
8Observer8 25.01.2026
Содержание блога Если у вас не установлены Android SDK, NDK, JDK, и т. д. то сделайте это по следующей инструкции: Установка Android SDK, NDK, JDK, CMake и т. д. Сборка примера Скачайте. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru