База данных Опции

[SunDevil]

Вот такая задача:
Надо составить базу данных товаров с их ценами и чтобы прога подсчитала общую сумму товара.
Вот я прилагаю вариант, но как всделать так, чтобы прога сумму считала, у меня не выходит :fire:
Там посмотрите, плиз, кто-нибудь процедуру output_baza и в ней написана Общая цена товара (руб.) и переменная sum, так надо, чтобы в эту переменную записывалась сумма товара
СПАСИБО!

[SunDevil]

2 volvo
Да, именно, общая стоимость ВСЕХ товаров в списке. Но там есть переменная price и у нее тип string. Как сумму-то получить

Сообщение отредактировано: SunDevil - 26.03.2005 4:09

[volvo]

Но там есть переменная price и у нее тип string. Как сумму-то получить

:D 2 варианта: или поменять тип Price на Integer (проблем при перекомпиляции не возникло, я проверил), или воспользоваться процедурой Val для преобразования строки в число.

В аттаче я добавил использование Val, но я бы все-таки рекомендовал поменять тип на Price: integer;
:yes:

P.S. Кстати, напрасно контроль ошибок ввода-вывода отключен постоянно. Желательно его отключать только перед критическими частями программы...