Помощь - Поиск - Пользователи - Календарь
Полная версия: Помогите решить задачи на записи
Форум «Всё о Паскале» > Pascal, Object Pascal > Задачи
Shkipper
Ребят можете помоч решить хоть какие нибудь задачи из этих

1.
Пусть дан массив, содержащий сведения об игрушках: указывается название игрушки (например, кукла, кубики, мяч, конструктор и т. д.), ее стоимость копейках и возрастные границы детей, для которых игрушка предназначена (например, для детей от 2 до 5 лет). Получите информацию:
а) о названиях игрушек, цена которых не превышает 4 рублей и которые
подходят детям до 5 лет;
b) о цене самого дорогого конструктора;
с) о названиях наиболее дорогих игрушек (цена которых отличается от цены
самой дорогой игрушки не более, чем на 1 рубль);

Lapp
Цитата(Shkipper @ 12.05.2011 16:36) *
1.
Пусть дан массив, содержащий сведения об игрушках: указывается название игрушки (например, кукла, кубики, мяч, конструктор и т. д.), ее стоимость копейках и возрастные границы детей, для которых игрушка предназначена (например, для детей от 2 до 5 лет). Получите информацию:
а) о названиях игрушек, цена которых не превышает 4 рублей и которые
подходят детям до 5 лет;
b) о цене самого дорогого конструктора;
с) о названиях наиболее дорогих игрушек (цена которых отличается от цены
самой дорогой игрушки не более, чем на 1 рубль);

С чем конкретно затруднения?
Сооруди запись типа такой:
type
tToy = record
Title: string;
Price: LongInt;
AgeMax,AgeMin: integer;
end;

Если массив таких записей дан, то выполнить указанные действия совсем просто. Например, вот так можно сделать пункт a:
for i:=1 to n do with a[i] do
if (Price<=400) and (AgeMin<=5) then WriteLn(Title);

Остальные пункты потребуют также провести поиск максимума.
Начинай делать и задавай более конкретный вопросы.

> а) о названиях игрушек, цена которых не превышает 4 рублей
интересно, а такие бывают? lol.gif
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.