Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 01.06.2009, 20:41   #1
Evidence
Новичок
Джуниор
 
Регистрация: 01.06.2009
Сообщений: 2
Вопрос Даны сведения о товарах на складе: наименование, цена, количество единиц товара. Найти товар, стоимость н

Даны сведения о товарах на складе: наименование, цена, количество единиц товара. Найти товар, стоимость на который не превышает средней стоимости.
Evidence вне форума Ответить с цитированием
Старый 03.06.2009, 00:09   #2
diliana
Форумчанин
 
Аватар для diliana
 
Регистрация: 24.05.2009
Сообщений: 119
По умолчанию

Сначала создаете структуру данных типа «запись»
Код:
type
tovar=record
  name: string [50];
  tcena: real;
  kolvo:byte; 
  end;
затем - массив записей
Код:
var
sklad: array [1..100] of tovar;
и соответственно доступ к информации будет таков, например
Код:
sklad [i]. name; //наименование товора
sklad [i]. kolvo; //количество единиц товара
diliana вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

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

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Написать программу, которая позволяет найти нужные сведения в телефонном справочнике (a:\phone.txt). Микола-Урал Помощь студентам 1 19.12.2008 23:54
Паскаль. 1.Даны массивы.2 Дан X найти... Stelix Помощь студентам 7 20.11.2007 21:08
Создать функцию, позволяющую вычислить новую стоимость товара после уценки. Визуал Бэйсик. КПСС Помощь студентам 6 07.11.2007 01:00