Очень нужна помощь

Sunny Girl
2/13/2007, 9:26:47 PM
Срочно нужна помощь в решении данной задачи.Я б и сама с удовольствием,да вот нету у меня на компьютере Delphi,а где-то найти в данный момент для меня проблематично...Вот.Спасите,пожалуйста,бедную студентку.
Дано
Имеется документ "Классификатор-ценник",содержащий слудующие реквизиты:
1.Наименование предмета.Реквизит представлен в виде символьной строки длиной в 5 символов.
2.Единицы измерения,в виде символьной строки в те же 5 символов.
3.Размер.Представлен в виде символьной строки длиной в 20 символов.Строка может сождержать 20 симовлов(цифровые,специальные и пр.)
4.Цена.Реквизит представлен в виде числа,имеющего дробную часть.
Требуется
Разработать программный код Delphi,включающий в себя функцию.Функция должна обеспечить определение статистической характеристики "Вариационный размер" для реквизита "Цена,"Вариационный размер" представляет собой разность между наибольшим и наименьшим значениями.
Marilyn Omen
2/13/2007, 10:06:52 PM
эээ... повторюсь: задача какая-то неясная... есть информация поподробней?
Sunny Girl
2/14/2007, 12:34:40 AM
Нету!Это слово в слово то,что настрочил препод.
Gorjie
2/14/2007, 4:14:50 AM
Поясни, там имеется база данных "Классификатор-ценник" или эти данные вбиваются по ходу дела? Нужно ли их сохранять после работы или это не важно?
Sunny Girl
2/14/2007, 1:08:06 PM
Да вот не знаю..((
База,по видимомоу,имеется,и сохранять ее тоже,наверное надо.В общем - главное сделать,а впарить перподу что-то вроде "Ой,я тааак поздно делала,я перепутала.Извините,аха?" будет не проблемой))

Чесслово стыдно даж просить))Сама б сделала давно,да Делфи нету((
-=Велла=-
2/14/2007, 2:04:14 PM
А что на Горбушке уже не продаются диски? В том числе с Делфи...
petya5
2/14/2007, 5:51:21 PM
(Gorjie @ 14.02.2007 - время: 01:14) Поясни, там имеется база данных "Классификатор-ценник" или эти данные вбиваются по ходу дела? Нужно ли их сохранять после работы или это не важно?
Не, ну какое сохранение в базу, если тут не идет речь даже о чтении из нее. :) И хотя по идее этот вариант наболее вероятен в реальной системе, думаю тут на это можно смело положить. Тем более, если "впарить преподу не проблема".
Что бы совсем отвязаться от БД можно написать структуру (record, думаю класс тут ни к чему), содержащую 4 необходимых поля, передавать массив структур, как бы считанный из БД в требуемую функцию. Внутри функции написать цикл, пробегающий по всем записям, при этом сохраняя самое минимальное и самое максимальное значение цены. И в Result добавить их разницу.

type TPriceClassifier = record begin
A:string
B:string
C:string
Price:Currency;
end;

type TPriceClassifiersRecords = Array of TPriceClassifier


function GetVarDimension(PriceClassifiers: TPriceClassifiersRecords):Currency
var i:integer;
var cMin, cMac: Currency;

begin
cMin: = PriceClassifiers.Price;
cMax: = cMin;
for i = 1 to Length(PriceClassifiers)-1
begin
if (PriceClassifiers.Price > cMax) then cMax := PriceClassifiers.Price
else
if (PriceClassifiers.Price < cMin) then cMin := PriceClassifiers.Price;
end;
Result := cMax - cMin;
end;

Вообще говоря для задачи совершенно неважны 3 осташиеся текстовых поля структуры. Поэтому вместо стреутуры можно передавать просто массив Currency и работать непосредственно с ним: ведь никакого отчета от функции не требуется, а стало быть и названия товаров ни к чему. Но это уж смотрите сами.

P.S. Если встретите какую-нить синтаксическую неточность, прошу извинять: на дельфике не писал уже лет 5. Да нет его у меня нигде поблизости. Вот если бы был нужен пример на c++ - тогда и на "компилируемость" проверил бы. :)

P.P.S. А девушка видимо вообще не рубит в том, чему ее учитат: не отлько даже приблизительно не знает как сделать, но и даже соответствующего ПО на компе не держит. Демаю ни один препод не дал бы писать прогу на делфике, если бы весь симестр обучал студентов Сям. :))))
Sunny Girl
2/14/2007, 7:44:25 PM
(-=Велла=- @ 14.02.2007 - время: 11:04) А что на Горбушке уже не продаются диски? В том числе с Делфи...
Складывается ощущение,что у студентов больше нет дел во время сессии..


И в том,чему меня учат,я прекрасно разбираюсь)))Просто преподают нам 1С структуру...Ну а препод решил проверить наши абилити в программировании..Тем и закончилось.К вопросу о том,почему у мну Делфи нет - ну нахрена козе боян?
-=Велла=-
2/14/2007, 7:52:42 PM
petya5, думаю, девушка хочет, чтоб ей тут на Дэфли написали прогу, прислали .pas файл и экзешник скорей всего..
Sunny Girl , вы бы указали на коаком вы курсе, тогда было бы понятно от какой степени знаний отталкиваться.. а то можно такую программу написать, что препод спросит "А что это? Ведь мы этого еще не проходили" )))

Аа.. увидела дополнение к посту...
А что программирование вообще как такогово не было чтоль?
Sunny Girl
2/14/2007, 8:52:17 PM
2-ой)))Программирование было...Но был Паскаль и с++...Когда-то в обозримом будущем должен быть Делфи.Я с ним кое-как,конечно,умею контактировать,но...
Marilyn Omen
2/14/2007, 9:47:35 PM
Есть предположение, что задание не включает в себя работу с базой.
Требуется
Разработать программный код Delphi,включающий в себя функцию.Функция должна обеспечить определение статистической характеристики "Вариационный размер" для реквизита "Цена,"Вариационный размер" представляет собой разность между наибольшим и наименьшим значениями.
Я думаю, нужна просто функция, которая на входе получает данные, выдает - "Вариационный размер". И все, предельно просто. Ввиду того, что у вас были только Паскаль и С++, а учите вы сейчас 1С, да еще и 2-ой курс только - ну не могут вам давать программировать на Делфях под 1С =)

переубедите
Gorjie
2/15/2007, 5:39:10 AM
(Marilyn Omen @ 14.02.2007 - время: 18:47) Я думаю, нужна просто функция, которая на входе получает данные, выдает - "Вариационный размер". И все, предельно просто. Ввиду того, что у вас были только Паскаль и С++, а учите вы сейчас 1С, да еще и 2-ой курс только - ну не могут вам давать программировать на Делфях под 1С =)

переубедите
Логично... А я уже начал писать полноценное приложение с возможностью создания базы данных с указанными полями, добавления, удаления полей и вывода вариационного размера в отдельное поле на форме...

Вот бы препод удивился, если бы она сдала такую прогу после курса Паскаля... biggrin.gif


2 Санни
Знаю, сам сдавал работы со впервые увиденным кодом, поэтому по ходу проги расписал всё максимально подробно. Лови готовую прогу. Будут вопросы - пиши тут или в личку. Скачай приложенный рисунок любым загрузчиком, переименуй .jpg в .rar и можешь идти сдаваться smile.gif
Sunny Girl
2/15/2007, 1:57:00 PM
Ух...Спасибо большое))Доложу о результатах))
Только вот архив был заблокирован,а после разблокировки оказывается поврежденным... unsure.gif
Gorjie
2/15/2007, 3:05:26 PM
(Sunny Girl @ 15.02.2007 - время: 10:57) Ух...Спасибо большое))Доложу о результатах))
Только вот архив был заблокирован,а после разблокировки оказывается поврежденным... unsure.gif
Попробуй залить с https://sxn.io/uploads/post/502/1171/496350.jpg
Marilyn Omen
2/15/2007, 3:16:10 PM
Я ей перезалил на рапиду и дал линк =)

Gorjie, толково написано и откомментировано) Правда я думал писать с VCL, раз уж Делфи. Ну, если надо будет, то переделать уже написанное - минутное дело wink.gif
Sunny Girl
2/15/2007, 3:31:30 PM
И..есть вопрос))а почему начальное значение цены всегда 4?))
В общем,я б еще хотела глянуть на сам код,ибо запомнить и понять это было б тоже неплохо wink.gif
Marilyn Omen
2/15/2007, 3:38:47 PM
Так ведь в архиве есть исходник - файл "Project2.dpr". Просто открой его блокнотом или по ф3 в тотале )
Sunny Girl
2/15/2007, 5:18:13 PM
ну да..не подумала,изините biggrin.gif
petya5
2/16/2007, 7:50:15 PM
(Sunny Girl @ 14.02.2007 - время: 17:52) 2-ой)))Программирование было...Но был Паскаль и с++...Когда-то в обозримом будущем должен быть Делфи.Я с ним кое-как,конечно,умею контактировать,но...
Паскаль, плюсы, Делфя в перспективе... Ну нифига себе у курсы! Никогда не встречал микст из паскаля и плюсов при обучении студентов. По-моему это смысла не имеет: либо то, либо другое, в зависимости от специальности. Расскажите, если конечно не секрет, что за специальность? Желательно не сколько название, сколько суть - что выпускник предположительно должен уметь делать?
Marilyn Omen
2/16/2007, 9:32:58 PM
Ну почему же, у нас вот учебная программа шла приблизительно так: Basic -> Pascal -> C++ -> ASM -> Delphi -> MySQL
Как цепочка? biggrin.gif
Специальность - прикладной математик wink.gif