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

Delphi Sources



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

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 30.09.2012, 19:32
Valentyn Valentyn вне форума
Прохожий
 
Регистрация: 30.09.2012
Сообщения: 3
Репутация: 10
По умолчанию Помогите написать программу

Здравствуйте. Вот задали в универе (1 курс) такую программу сварганить, сижу "ломаю" голову. Непонятнее всего в ней - это при кахих входный параметрах должно выполняться третье действие? Если они (входные данные) подходят к первому или второму?
Изображения
Тип файла: bmp 1.bmp (113.1 Кбайт, 54 просмотров)
Ответить с цитированием
  #2  
Старый 30.09.2012, 21:18
Аватар для poli-smen
poli-smen poli-smen вне форума
Профессионал
 
Регистрация: 06.08.2012
Адрес: Кривой Рог
Сообщения: 1,791
Версия Delphi: Delphi 7, XE2
Репутация: 4415
По умолчанию

Цитата:
Сообщение от Valentyn
Здравствуйте. Вот задали в универе (1 курс) такую программу сварганить, сижу "ломаю" голову. Непонятнее всего в ней - это при кахих входный параметрах должно выполняться третье действие? Если они (входные данные) подходят к первому или второму?
Код:
uses Math;

function V(a, b, c, d, x, y, z: Extended): Extended;
begin
  if ((x + y + z) >= c) and ((x + y + z) <= d) then
  begin
    Result := Max(Abs(x), Max(Abs(y), Abs(z)));
  end
  else
  if ((x + y + z) < c) and ((x + y + z) > d) then
  begin
    Result := Sqrt(Sqr(a) + Sqr(b));
  end
  else
  begin
    Result := Min(Sqr(x), Min(Sqr(y), Sqr(z)));
  end;
end;
Ответить с цитированием
Этот пользователь сказал Спасибо poli-smen за это полезное сообщение:
Valentyn (22.10.2012)
  #3  
Старый 22.10.2012, 16:41
Valentyn Valentyn вне форума
Прохожий
 
Регистрация: 30.09.2012
Сообщения: 3
Репутация: 10
По умолчанию

Спасибо за код. Программа работала нормально. Буду очень благодарен если поможете ещё с одной:
Изображения
Тип файла: bmp Новый точечный рисунок.bmp (192.5 Кбайт, 18 просмотров)
Ответить с цитированием
  #4  
Старый 22.10.2012, 17:04
Аватар для poli-smen
poli-smen poli-smen вне форума
Профессионал
 
Регистрация: 06.08.2012
Адрес: Кривой Рог
Сообщения: 1,791
Версия Delphi: Delphi 7, XE2
Репутация: 4415
По умолчанию

Цитата:
Сообщение от Valentyn
Спасибо за код. Программа работала нормально. Буду очень благодарен если поможете ещё с одной:
К сожалению условие непонятное: если задан массив A(n), то откуда мог взяться элемент a2n?
Ответить с цитированием
  #5  
Старый 22.10.2012, 17:43
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,004
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

Цитата:
Сообщение от poli-smen
К сожалению условие непонятное: если задан массив A(n), то откуда мог взяться элемент a2n?

a2n - это значит четный индекс.
А, вообще, красивый "развод" на "сделать задачку"
Ответить с цитированием
  #6  
Старый 22.10.2012, 21:36
Valentyn Valentyn вне форума
Прохожий
 
Регистрация: 30.09.2012
Сообщения: 3
Репутация: 10
По умолчанию

Цитата:
Сообщение от lmikle
a2n - это значит четный индекс.
А, вообще, красивый "развод" на "сделать задачку"

Я пока только учусь. Не все же "учеными" рождаются. А вообще-то задачек мы делаем много (это уже 12-я в этом семестре), но вот на этой застопорился, так как не очень хорошо понимаю массивы.
Ответить с цитированием
  #7  
Старый 08.11.2012, 15:54
Аня Аня вне форума
Прохожий
 
Регистрация: 08.11.2012
Сообщения: 2
Репутация: 10
По умолчанию

Здравствуйте!
Мне тоже необходимо написать программу имитации системы реального времени швейного производства. Долго ломала голову над тем что там можно отслеживать в реальном времени. Надумала только отслеживание работоспособности оборудования. Типа на каждой машине будет стоять датчик потребления электроэнергии с кнопкой неисправности. Выглядеть на программе, по моей задумке, это должно как постоянно обновляющаяся гистограмма. Работа на уровне расчетно графической. Помогите с кодом относительно обновляющейся по таймеру гистограммы с отображением значений. Прошу помощи потому как уровень знания языка и оболочки минимальный, мне бы только сдать. Заранее спасибо, откликнувшимся на крик моей души с отсутствующей совестью.
Ответить с цитированием
  #8  
Старый 08.11.2012, 17:08
Аватар для PhoeniX
PhoeniX PhoeniX вне форума
Always hardcore!
 
Регистрация: 04.03.2009
Адрес: СПб
Сообщения: 3,239
Версия Delphi: GCC/FPC/FASM
Репутация: 62149
По умолчанию

Аня, а прикреплённая тема для чего? Пункт 5.
__________________
Оставайтесь хорошими людьми...
VK id2634397, ds [at] phoenix [dot] dj
Ответить с цитированием
Ответ


Delphi Sources

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

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

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

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


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


 

Сайт

Форум

FAQ

RSS лента

Прочее

 

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

ВКонтакте   Facebook   Twitter