Войти
NeoBooker.ru
Добро пожаловать к нам в гости!
Наш сайт посвящён программе NeoBook, с помощью которой вы легко сможете создавать собственные мультимедиа-приложения без необходимости изучать сложные языки программирования! Зарегистрируйтесь, чтобы стать членом нашего сообщества.
  • Страница 1 из 1
  • 1
Модератор форума: Peter, DEMBEL, YURIY  
Нахождение Min и Max
UIYOYXBДата: Сб, 17 Ноября 2012, 11:54 | Сообщение # 1
Участник
В общем суть вопроса такова, надо найти минимальное и максимальное число из массива чисел, например такого: 100, 200, 25, 1000, 90. Буду признателен за любые подсказки по этому поводу :)

ПыСы Проверьте форум на наличие вирусов, создать тему смог раза с двадцатого. На других Юкозовских сайтах такого не наблюдаю.

Прикрепления: 7184840.jpg (28.9 Kb)
 
СообщениеВ общем суть вопроса такова, надо найти минимальное и максимальное число из массива чисел, например такого: 100, 200, 25, 1000, 90. Буду признателен за любые подсказки по этому поводу :)

ПыСы Проверьте форум на наличие вирусов, создать тему смог раза с двадцатого. На других Юкозовских сайтах такого не наблюдаю.


Автор - UIYOYXB
Дата добавления - 17 Ноября 2012 в 11:54
antonДата: Сб, 17 Ноября 2012, 12:27 | Сообщение # 2
Ветеран форума
Я видел какой то Плагин с подобной функцией... но пока не как не могу вспомнить. Средствами NeoBook это можно реализовать так:
Code
SetVar "[masiv]" "100,200,25,1000,90"
StrParse "[masiv]" "," "[array]" "[i]"
SetVar "[min]" "[array1]"
SetVar "[max]" "[min]"
          Loop "1" "[i]" "[arr]"
               If "[array[arr]]" ">" "[max]"
                  SetVar "[max]" "[array[arr]]"
               EndIf
               If "[array[arr]]" "<" "[min]"
                  SetVar "[min]" "[array[arr]]"
               EndIf
EndLoop


Пример реализации в прикреплении.

Прикрепления: 0294187.png (17.0 Kb) · minmax.zip (2.1 Kb)


"Вы знаете, нам очень понравились все варианты, что вы прислали. Даже не знаем, что выбрать… А может попробуем объединить все три логотипа в один?"

Сообщение отредактировано
anton - Сб, 17 Ноября 2012, 12:34
 
СообщениеЯ видел какой то Плагин с подобной функцией... но пока не как не могу вспомнить. Средствами NeoBook это можно реализовать так:
Code
SetVar "[masiv]" "100,200,25,1000,90"
StrParse "[masiv]" "," "[array]" "[i]"
SetVar "[min]" "[array1]"
SetVar "[max]" "[min]"
          Loop "1" "[i]" "[arr]"
               If "[array[arr]]" ">" "[max]"
                  SetVar "[max]" "[array[arr]]"
               EndIf
               If "[array[arr]]" "<" "[min]"
                  SetVar "[min]" "[array[arr]]"
               EndIf
EndLoop


Пример реализации в прикреплении.


Автор - anton
Дата добавления - 17 Ноября 2012 в 12:27
wikslДата: Сб, 17 Ноября 2012, 13:44 | Сообщение # 3
Участник
Quote (anton)

SetVar "[masiv]" "100,200,25,1000,90"
StrParse "[masiv]" "," "[array]" "[i]"
SetVar "[min]" "[array1]"
SetVar "[max]" "[min]"
Loop "1" "[i]" "[arr]"
If "[array[arr]]" ">" "[max]"
SetVar "[max]" "[array[arr]]"
EndIf
If "[array[arr]]" "<" "[min]"
SetVar "[min]" "[array[arr]]"
EndIf
EndLoop


Я б чуть чуть поменял бы в цикле, чтобы не делать лишних проверок:
Loop "1" "[i]" "[arr]"
If "[array[arr]]" ">" "[max]"
SetVar "[max]" "[array[arr]]"
else
If "[array[arr]]" "<" "[min]"
SetVar "[min]" "[array[arr]]"
EndIf
EndIf
EndLoop
а так обычный поиск максимума и минимума школьная программа по информатике- 9 класс (Беларусь)


Вик

Сообщение отредактировано
wiksl - Сб, 17 Ноября 2012, 13:44
 
Сообщение
Quote (anton)

SetVar "[masiv]" "100,200,25,1000,90"
StrParse "[masiv]" "," "[array]" "[i]"
SetVar "[min]" "[array1]"
SetVar "[max]" "[min]"
Loop "1" "[i]" "[arr]"
If "[array[arr]]" ">" "[max]"
SetVar "[max]" "[array[arr]]"
EndIf
If "[array[arr]]" "<" "[min]"
SetVar "[min]" "[array[arr]]"
EndIf
EndLoop


Я б чуть чуть поменял бы в цикле, чтобы не делать лишних проверок:
Loop "1" "[i]" "[arr]"
If "[array[arr]]" ">" "[max]"
SetVar "[max]" "[array[arr]]"
else
If "[array[arr]]" "<" "[min]"
SetVar "[min]" "[array[arr]]"
EndIf
EndIf
EndLoop
а так обычный поиск максимума и минимума школьная программа по информатике- 9 класс (Беларусь)

Автор - wiksl
Дата добавления - 17 Ноября 2012 в 13:44
UIYOYXBДата: Сб, 17 Ноября 2012, 16:50 | Сообщение # 4
Участник
Огромное спасибо :) !
 
СообщениеОгромное спасибо :) !

Автор - UIYOYXB
Дата добавления - 17 Ноября 2012 в 16:50
  • Страница 1 из 1
  • 1
Поиск: