Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > Delphi .NET
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 20.03.2011, 14:30
Future Future вне форума
Прохожий
 
Регистрация: 20.03.2011
Сообщения: 8
Репутация: 10
По умолчанию Задача по массивам в Делфи

Обработка одномерных массивов.

Задача:
Уменьшить все элементы с четными индексами заданного массива а1,а2,...аn, на величину минимального элемента этого массива.
Ответить с цитированием
  #2  
Старый 20.03.2011, 14:37
Аватар для Pilot_Red
Pilot_Red Pilot_Red вне форума
Продвинутый
 
Регистрация: 01.11.2006
Адрес: Карелия
Сообщения: 702
Версия Delphi: D7
Репутация: 11581
По умолчанию

а в чем проблема. Хоть что-то сделано???
Ответить с цитированием
  #3  
Старый 20.03.2011, 14:57
Future Future вне форума
Прохожий
 
Регистрация: 20.03.2011
Сообщения: 8
Репутация: 10
По умолчанию

я не понимаю,как записать .Точнее вот начало ,наверное,так
var A:array[1...10] of integer=[1,2,-3,4,-7,8,9,5,-6,10];
i,n:=integer;
а дальше не знаю.Как записать ,что нам надо уменьшить четные числа на min значение(в данном промежутке min число -7 )..??
Ответить с цитированием
  #4  
Старый 20.03.2011, 15:03
Аватар для Pilot_Red
Pilot_Red Pilot_Red вне форума
Продвинутый
 
Регистрация: 01.11.2006
Адрес: Карелия
Сообщения: 702
Версия Delphi: D7
Репутация: 11581
По умолчанию

Цитата:
Сообщение от Future
я не понимаю,как записать .Точнее вот начало ,наверное,так
var A:array[1...10] of integer=[1,2,-3,4,-7,8,9,5,-6,10];
i,n:=integer;
а дальше не знаю.Как записать ,что нам надо уменьшить четные числа на min значение(в данном промежутке min число -7 )..??

Вообще задача решается в два счета...!
организовываешь 2 цикла. в одном ищешь мин. элемент, а во-втором цикле собственно проверяешь на четность индексы элементов, и при удачной проверке делаешь вычитание...
Ответить с цитированием
  #5  
Старый 20.03.2011, 15:08
Future Future вне форума
Прохожий
 
Регистрация: 20.03.2011
Сообщения: 8
Репутация: 10
По умолчанию

таак.1-ый цикл понятен.а 2-ой как?как проверить их на четность?
Ответить с цитированием
  #6  
Старый 20.03.2011, 15:12
Аватар для Pilot_Red
Pilot_Red Pilot_Red вне форума
Продвинутый
 
Регистрация: 01.11.2006
Адрес: Карелия
Сообщения: 702
Версия Delphi: D7
Репутация: 11581
По умолчанию

есть операция деления по модулю - mod
она возвращает остаток от деления, например:

4 mod 2=0
5 mod 2 =1
9 mod 3 =0

дальше попробуй сам догадаться как это использовать...
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра
Комбинированный вид Комбинированный вид

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 22:06.


 

Сайт

Форум

FAQ

RSS лента

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2023

ВКонтакте   Facebook   Twitter