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

Не, ну какое сохранение в базу, если тут не идет речь даже о чтении из нее. :) И хотя по идее этот вариант наболее вероятен в реальной системе, думаю тут на это можно смело положить. Тем более, если "впарить преподу не проблема".
Что бы совсем отвязаться от БД можно написать структуру (record, думаю класс тут ни к чему), содержащую 4 необходимых поля, передавать массив структур, как бы считанный из БД в требуемую функцию. Внутри функции написать цикл, пробегающий по всем записям, при этом сохраняя самое минимальное и самое максимальное значение цены. И в Result добавить их разницу.

type TPriceClassifier = record begin
A:string[5]
B:string[5]
C:string[20]
Price:Currency;
end;

type TPriceClassifiersRecords = Array of TPriceClassifier


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

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

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

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

P.P.S. А девушка видимо вообще не рубит в том, чему ее учитат: не отлько даже приблизительно не знает как сделать, но и даже соответствующего ПО на компе не держит. Демаю ни один препод не дал бы писать прогу на делфике, если бы весь симестр обучал студентов Сям. :))))

Складывается ощущение,что у студентов больше нет дел во время сессии..


И в том,чему меня учат,я прекрасно разбираюсь)))Просто преподают нам 1С структуру...Ну а препод решил проверить наши абилити в программировании..Тем и закончилось.К вопросу о том,почему у мну Делфи нет - ну нахрена козе боян?

Это сообщение отредактировал Sunny Girl - 14-02-2007 - 17:48

Я думаю, нужна просто функция, которая на входе получает данные, выдает - "Вариационный размер". И все, предельно просто. Ввиду того, что у вас были только Паскаль и С++, а учите вы сейчас 1С, да еще и 2-ой курс только - ну не могут вам давать программировать на Делфях под 1С =)

переубедите

Это сообщение отредактировал Marilyn Omen - 14-02-2007 - 19:52

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

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


2 Санни
Знаю, сам сдавал работы со впервые увиденным кодом, поэтому по ходу проги расписал всё максимально подробно. Лови готовую прогу. Будут вопросы - пиши тут или в личку. Скачай приложенный рисунок любым загрузчиком, переименуй .jpg в .rar и можешь идти сдаваться

Это сообщение отредактировал Gorjie - 15-02-2007 - 03:40

Попробуй залить с http://sxn.today/uploads/post/502/1171/496350.jpg

Паскаль, плюсы, Делфя в перспективе... Ну нифига себе у курсы! Никогда не встречал микст из паскаля и плюсов при обучении студентов. По-моему это смысла не имеет: либо то, либо другое, в зависимости от специальности. Расскажите, если конечно не секрет, что за специальность? Желательно не сколько название, сколько суть - что выпускник предположительно должен уметь делать?

Та же специальность. Паскаль одновременно с ASM, а потом C и C++. На первом курсе.

:) Цепочка и впрямь впечатляет. :) Если басик еще как-то сюда вписывается: с него частенько программиированию как таковому начинают обучать, то вот зачем смешивать паскаль и плюсы, я понять не могу. Тем более, что потом снова перешли на Дельфика. Это для общего развития преподавали, что бы, как девушка заметила, "мастер на все руки" (с) получился? :)