Определить минимальный положительный элемент массива X(10) - PascalABC.NET

PascalABC.NET

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Рейтинг 4.56/9:

@Gruper 0 / 0 / 0 Регистрация: 29.04.2020 Сообщений: 1

	Определить минимальный положительный элемент массива X(10) 29.04.2020, 08:20. Показов 1792. Ответов 1 Метки нет (Все метки) Определить минимальный положительный элемент массива X(10) 0

IT_Exp

Эксперт

34794 / 4073 / 2104

Регистрация: 17.06.2006

Сообщений: 32,602

Блог

29.04.2020, 08:20

Ответы с готовыми решениями:

Найти минимальный положительный элемент массива
Найти минимальный элемент массива, если известно, что значения элементов массива положительны и не превосходят 100.

Найти минимальный положительный элемент массива
Найти минимальный положительный элемент массива. <-- Вот собсна и задание.

Найти минимальный положительный элемент одномерного массива.
Ввод массива с клавиатуры

JuriiMW

5095 / 2661 / 2355

Регистрация: 10.12.2014

Сообщений: 10,060

29.04.2020, 08:44

Pascal
1
2
3
4
5
begin
  var x:=ArrRandomInteger(10,-100,100);
  var f:=x.Println.Where(v->v>0);
  if f.Count=0 then 'нету!'.Print else f.Min.Print;
end.

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

BasicMan

Эксперт

29316 / 5623 / 2384

Регистрация: 17.02.2009

Сообщений: 30,364

Блог

29.04.2020, 08:44

Помогаю со студенческими работами здесь

Заменить минимальный положительный элемент массива нулем
1) заменить минимальный положительный элемент нулем. 2) заменить элемент с k-1-го по k-2-ой на обратный. помогите решить плиз!

Заменить минимальный по модулю положительный элемент массива нулем
Дан массив целых чисел, состоящий из 30 элементов. Заполнить его с клавиатуры. Заменить минимальный по модулю положительный элемент...

Определить минимальный элемент массива и его порядковый номер, заменить минимальный элемент массива нулём
Определить минимальный элемент массива С и его порядковый номер, замените минимальный элемент массива нулём. Массив С(К),...

Заменить минимальный по модулю положительный элемент массива последним элементом
procedure TForm1.Button1Click(Sender: TObject); var i,min:integer; begin Randomize; n:=strtoint(edit5.text); Setlength(D,n); ...

Найти первый положительный минимальный элемент массива, и переставить его на первое место
Помогите решить,язык Pascal abc Дан массив из n<=50 вещественных чисел,среди которых есть одинаковые элементы.Найти первый положительный...

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

Или воспользуйтесь поиском по форуму:

Новые блоги и статьи Все статьи Все блоги /
1С: Контроль уникальности заводского номера Maks 23.03.2026 Алгоритм контроля уникальности заводского (или серийного) номера на примере документа выдачи шин для спецтехники с табличной частью. Данные берутся из регистра сведений, по которому настроено. . .	Хочу заставить корпорации вкладываться в здоровье сотрудников: делаю мат модель здравосохранения anaschu 22.03.2026 e7EYtONaj8Y Z4Tv2zpXVVo https:/ / github. com/ shumilovas/ med2. git	1С: Программный отбор элементов справочника по группе Maks 22.03.2026 Установка программного отбора элементов справочника "Номенклатура" из модуля формы документа. В качестве фильтра для отбора справочника служит группа номенклатуры. Отбор по наименованию группы. . .	Как я обхитрил таблицу Word Alexander-7 21.03.2026 Когда мигает курсор у внешнего края таблицы, и нам надо перейти на новую строку, а при нажатии Enter создается новый ряд таблицы с ячейками, то мы вместо нервных нажатий Энтеров мы пишем любые буквы. . .
Krabik - рыболовный бот для WoW 3.3.5a AmbA 21.03.2026 без регистрации и смс. Это не торговля, приложение не содержит рекламы. Выполняет свою непосредственную задачу - автоматизацию рыбалки в WoW - и ничего более. Однако если админы будут против -. . .	1С: Программный отбор элементов справочника по значению перечисления Maks 21.03.2026 Установка программного отбора элементов справочника "Сотрудники" из модуля формы документа. В качестве фильтра для отбора служит значение перечислений. / / Событие "НачалоВыбора" реквизита на форме. . .	Переходник USB-CAN-GPIO Eddy_Em 20.03.2026 Достаточно давно на работе возникла необходимость в переходнике CAN-USB с гальваноразвязкой, оный и был разработан. Однако, все меня терзала совесть, что аж 48-ногий МК используется так тупо: просто. . .	Оттенки серого Argus19 18.03.2026 Оттенки серого Нашёл в интернете 3 прекрасных модуля: Модуль класса открытия диалога открытия/ сохранения файла на Win32 API; Модуль класса быстрого перекодирования цветного изображения в оттенки. . .

Наверх