Массивы. Заменить максимальный элемент на противоположный по знаку

@marvel007 · Регистрация: 24.05.2014

Author24 — интернет-сервис помощи студентам

Имеется массив А из N произвольных чисел (A(N)), среди которых есть положительные, отрицательные и равные нулю. Составить программу на языке программирования Pascal в соответствии с вариантом. Оформить протокол работы программы.
1.Заменить максимальный элемент на противоположный по знаку.
2.Заменить нулями элементы между минимальным и максимальным, кроме них самих.

@JokeR.BY · 27.05.2014, 22:38

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
var
  mass : array of ShortInt;
  i, n, maxID, max : Byte;
begin
  Write('Input n='); ReadLn(n);
  SetLength(mass, n);
  max := -20;
  for i := 0 to n-1 do
  begin
    mass[i] := Random(21) - 10;
    Write('mass[', i+1, ']=', mass[i]:3, #9);
    if (max < mass[i]) then
    begin
      max := mass[i];
      maxID := i;
    end;
  end;
  WriteLn;
  mass[maxID] := -1 * mass[maxID];
  for i := 0 to n-1 do
    Write('mass[', i+1, ']=', mass[i]:3, #9);
end.

Новые блоги и статьи Все статьи Все блоги /
sshd restrictions, ssh access limitations jigi33 26.03.2025 sshd restrictions \| ssh access limitations рестрикции доступа на сервер sshd статья: https:/ / www. golinuxcloud. com/ restrict-allow-ssh-certain-users-groups-rhel	Компиляция C++ с Clang API NullReferenced 24.03.2025 Компиляторы обычно воспринимаются как черные ящики, которые превращают исходный код в исполняемые файлы. Мы запускаем компилятор командой в терминале, и вуаля — получаем бинарник. Но что если нужно. . .	Многопоточное программирование в C#: Класс Thread UnmanagedCoder 24.03.2025 Когда запускается приложение на компьютере, операционная система создаёт для него процесс - виртуальное адресное пространство. В C# этот процесс изначально получает один поток выполнения — главный. . .	SwiftUI Data Flow: Передача данных между представлениями mobDevWorks 23.03.2025 При первом знакомстве со SwiftUI кажется, что фреймворк предлагает избыточное количество механизмов для передачи данных: @State, @Binding, @StateObject, @ObservedObject, @EnvironmentObject и другие. . . .	Моки в Java: Сравниваем Mockito, EasyMock, JMockit Javaican 23.03.2025 Как протестировать класс, который зависит от других сложных компонентов, таких как базы данных, веб-сервисы или другие классы, с которыми и так непросто работать в тестовом окружении? Для этого и. . .
Архитектурные паттерны микросервисов: ТОП-10 шаблонов ArchitectMsa 22.03.2025 Популярность микросервисной архитектуры объясняется множеством важных преимуществ. К примеру, она позволяет командам разработчиков работать независимо друг от друга, используя различные технологии и. . .	Оптимизация рендеринга в Unity: Сортировка миллиона спрайтов GameUnited 22.03.2025 Помните, когда наличие сотни спрайтов в игре приводило к существенному падению производительности? Время таких ограничений уходит в прошлое. Сегодня геймдев сталкивается с задачами совершенно иного. . .	Образование и практика Igor3D 21.03.2025 Добрый день А вот каково качество/ эффективность ВУЗовского образования? Аналитическая геометрия изучается в первом семестре и считается довольно легким курсом, что вполне справедливо. Ну хорошо,. . .	Lazarus. Таблица с объединением ячеек. Massaraksh7 21.03.2025 Понадобилась представление на экране таблицы с объединёнными ячейками. И не одной, а штук триста, и все разные. На Delphi я использовал для этих целей TStringGrid, и то, кривовато получалось. А в. . .	Async/await в Swift: Асинхронное программирование в iOS mobDevWorks 20.03.2025 Асинхронное программирование долго было одной из самых сложных задач для разработчиков iOS. В течение многих лет мы сражались с замыканиями, диспетчеризацией очередей и обратными вызовами, чтобы. . .

@marvel007 0 / 0 / 0 Регистрация: 24.05.2014 Сообщений: 4

	Массивы. Заменить максимальный элемент на противоположный по знаку 27.05.2014, 20:24. Показов 1356. Ответов 1 Метки нет (Все метки) Имеется массив А из N произвольных чисел (A(N)), среди которых есть положительные, отрицательные и равные нулю. Составить программу на языке программирования Pascal в соответствии с вариантом. Оформить протокол работы программы. 1.Заменить максимальный элемент на противоположный по знаку. 2.Заменить нулями элементы между минимальным и максимальным, кроме них самих. 0

Опции темы

Массивы. Заменить максимальный элемент на противоположный по знаку

Решение