Что левее минимум или максимум массива

@MultyStepan · Регистрация: 08.02.2014

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

Вводиться масив из десяти елементов.
Выяснить, что левее - минимум или максимум массива.
Введение массива уже написал, водить буду через СтрингГрид.
Как выполнить само сравнение, что левее максимум или минимум??
Может кто стыкался с такой задачей, дайте хоть словесный алгоритм.

@FIL · 18.07.2014, 18:45

Добавляешь 2 переменных для хранения индексов мин и макс значений.
Приравниваешь их самому "правому" индексу Грида.
Далее, в обратном цикле сравниваешь эл-ты Грида с эл-тами, имеющими индексы мин и макс и, если надо, меняешь значения переменных на текущий индекс.
Значение какой переменной окажется меньше - тот эл-т и левее.

@Puporev · 18.07.2014, 19:45

Сообщение от FIL

Приравниваешь их самому "правому" индексу Грида.

Можно и к левому, ничего не изменится.

@FIL · 18.07.2014, 20:05

Сообщение от Puporev

ничего не изменится.

Ну да

@MultyStepan · 18.07.2014, 20:29 **[ТС]**

Добавляешь 2 переменных для хранения индексов мин и макс значений.
Приравниваешь их самому "правому" индексу Грида.
Далее, в обратном цикле сравниваешь эл-ты Грида с эл-тами, имеющими индексы мин и макс и, если надо, меняешь значения переменных на текущий индекс.
Значение какой переменной окажется меньше - тот эл-т и левее.

Ребята, заблудился в трьох соснах.
Помогите с кодом. Уже запутался окончательно.
Скинул, уже то что уже написал, может хоть что-то из этого правильно.

Pascal

procedure TForm1.Button1Click(Sender: TObject);
var
a:array [1..10] of integer;
i,max,min,k:integer;
begin
a[i]:=StrToInt(StringGrid1.Cells[i-1,0]);
  k:=a[1];//первый елемент массива
  max:=k;
  min:=k;
  for i := 1 to 10 do
  //выполнение сравнения с самым правым елементом
     if (a[10]>max) and (a[10]<min) then
            Label1.Caption:='Максимум правее' ;
 
 
 
end;
 
end.

@FIL · 18.07.2014, 20:49

И что этот код делает?

@MultyStepan · 18.07.2014, 21:40 **[ТС]**

К сожалению, все мои старания оказались напрасны и этот код ничего не делает...

@FIL · 18.07.2014, 22:08

Сообщение от MultyStepan

все мои старания оказались напрасны

Значит надо увеличить число стараний и повысить их качество.

@Puporev · 19.07.2014, 07:11

Delphi

procedure TForm1.Button1Click(Sender: TObject);
var a:array [1..10] of integer;
    i,imax,imin:integer;
begin
for i:=1 to 10 do
 begin
  a[i]:=StrToInt(StringGrid1.Cells[i-1,0]);
  if i=1 then
   begin
    imax=1;
    imin:=1;
   end
  else if a[i]<a[imin] then imin:=i
  else if a[i]>a[imax] then imax:=i;
 end;
if imin<imax then  Label1.Caption:='Минимум левее'
else Label1.Caption:='Максимум левее';
end;

@MultyStepan · 19.07.2014, 09:50 **[ТС]**

Сообщение от FIL

Значит надо увеличить число стараний и повысить их качество.

Так и буду делать.
Это ещё далеко не последнее задание с массивами..

Новые блоги и статьи
Как настроить CI/CD с помощью Jenkins InfoMaster 15.01.2025 Введение в CI/ CD и Jenkins В современной разработке программного обеспечения непрерывная интеграция (CI) и непрерывная доставка (CD) стали неотъемлемыми элементами процесса создания качественных. . .	Как написать микросервис на Go/Golang с Kafka и GitHub CI/CD InfoMaster 14.01.2025 Определение микросервиса, преимущества использования Go/ Golang Микросервис – это архитектурный подход к разработке программного обеспечения, при котором приложение состоит из небольших, независимо. . .	Как написать микросервис с нуля на C# с RabbitMQ, CQRS и CI/CD InfoMaster 14.01.2025 В современном мире разработки программного обеспечения микросервисная архитектура стала стандартом де-факто для создания масштабируемых и гибких приложений. Этот архитектурный подход предполагает. . .	Как создать интернет-магазин на PHP и JavaScript InfoMaster 14.01.2025 В современном мире электронная коммерция стала неотъемлемой частью бизнеса. Создание собственного интернет-магазина открывает широкие возможности для предпринимателей, позволяя достичь большей. . .	Как написать Тетрис на Ассемблере InfoMaster 14.01.2025 Тетрис – одна из самых узнаваемых и популярных компьютерных игр, созданная в 1984 году советским программистом Алексеем Пажитновым. За прошедшие десятилетия она завоевала симпатии миллионы людей по. . .	Как создать игру "Танчики" на Unity3d и C# InfoMaster 14.01.2025 Разработка игр – это увлекательный процесс, сочетающий в себе творчество и технические навыки. В этой статье мы рассмотрим создание классической игры "Танчики" с использованием Unity3D и языка. . .
Организую платный онлайн микро-курс по доработке Android-клиента Telegram _Ivana 14.01.2025 Официальная версия и распространенные форки не полностью устраивают? Сделай свою кастомную версию клиента! 4 занятия по 2 часа (2 недели пн, ср 19:00-21:00 по Москве). Первое вводное занятие. . .	Как создать приложение для фитнеса для iOS/iPhone на Kotlin InfoMaster 14.01.2025 Создание собственного фитнес-приложения — это не только захватывающий, но и полезный процесс, ведь оно может стать вашим верным помощником на пути к здоровому и активному образу жизни. В современных. . .	Как создать приложение магазина для iOS/iPhone на Swift InfoMaster 14.01.2025 Введение в разработку iOS-приложений Разработка приложений для iPhone и других устройств на базе iOS открывает огромные возможности для создания инновационных мобильных решений. В данной статье мы. . .	Это работает. Скорость асинхронной логики велика. Вопрос видимо останется в стабильности. Плата - огонь! Hrethgir 13.01.2025 По прошлому проекту в Logisim Evolution https:/ / www. cyberforum. ru/ blogs/ 223907/ blog8781. html прилагаю файл архива проекта в Gowin Eda. Восьмибитный счётчик из сумматора+ генератор сигнала. . .	UserScript для подсветки кнопок языков программирования в зависимости от текущего раздела volvo 13.01.2025 В результате работы этого скрипта подсвечиваются нужные кнопки не только в форме быстрого ответа, но и при редактировании сообщения: / / ==UserScript== / / @name CF_DefaultLangSelect / / . . .	Введение в модели и алгоритмы машинного обучения InfoMaster 12.01.2025 Машинное обучение представляет собой одну из наиболее динамично развивающихся областей искусственного интеллекта, которая фокусируется на разработке алгоритмов и методов, позволяющих компьютерам. . .

@MultyStepan 3 / 3 / 4 Регистрация: 08.02.2014 Сообщений: 213
		1
	Что левее минимум или максимум массива 18.07.2014, 18:25. Показов 1363. Ответов 9 Метки нет (Все метки) Вводиться масив из десяти елементов. Выяснить, что левее - минимум или максимум массива. Введение массива уже написал, водить буду через СтрингГрид. Как выполнить само сравнение, что левее максимум или минимум?? Может кто стыкался с такой задачей, дайте хоть словесный алгоритм. 0

@FIL Модератор 3492 / 2614 / 742 Регистрация: 19.09.2012 Сообщений: 7,977
	18.07.2014, 18:45	2
	Добавляешь 2 переменных для хранения индексов мин и макс значений. Приравниваешь их самому "правому" индексу Грида. Далее, в обратном цикле сравниваешь эл-ты Грида с эл-тами, имеющими индексы мин и макс и, если надо, меняешь значения переменных на текущий индекс. Значение какой переменной окажется меньше - тот эл-т и левее. 1

@Puporev Почетный модератор 64303 / 47600 / 32742 Регистрация: 18.05.2008 Сообщений: 115,181
	18.07.2014, 19:45	3
	Сообщение от FIL Приравниваешь их самому "правому" индексу Грида. Можно и к левому, ничего не изменится. 0

@FIL Модератор 3492 / 2614 / 742 Регистрация: 19.09.2012 Сообщений: 7,977
	18.07.2014, 20:05	4
	Сообщение от Puporev ничего не изменится. Ну да 0

@FIL Модератор 3492 / 2614 / 742 Регистрация: 19.09.2012 Сообщений: 7,977
	18.07.2014, 20:49	6
	И что этот код делает? 0

@MultyStepan 3 / 3 / 4 Регистрация: 08.02.2014 Сообщений: 213
	18.07.2014, 21:40 [ТС]	7
	К сожалению, все мои старания оказались напрасны и этот код ничего не делает... 0

@FIL Модератор 3492 / 2614 / 742 Регистрация: 19.09.2012 Сообщений: 7,977
	18.07.2014, 22:08	8
	Сообщение от MultyStepan все мои старания оказались напрасны Значит надо увеличить число стараний и повысить их качество. 1

@MultyStepan 3 / 3 / 4 Регистрация: 08.02.2014 Сообщений: 213
	19.07.2014, 09:50 [ТС]	10
	Сообщение от FIL Значит надо увеличить число стараний и повысить их качество. Так и буду делать. Это ещё далеко не последнее задание с массивами.. 0

Что левее минимум или максимум массива

Решение