Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.67/6: Рейтинг темы: голосов - 6, средняя оценка - 4.67
Mylene
0 / 0 / 0
Регистрация: 18.11.2014
Сообщений: 10
1

Получить сведения о названиях игрушек, стоимость которых не превосходит 4 грв, и которые подходят детям 5 лет

24.11.2014, 13:38. Просмотров 1001. Ответов 5
Метки нет (Все метки)

Записи

Сведениями об игрушках являются: название (конструктор, кукла и т. д.), стоимость игрушки, возрастные границы (от 2 до 5 лет и т. д.). Получить сведения о названиях игрушек, стоимость которых не превосходит 4 грв, и которые подходят детям 5 лет.
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
24.11.2014, 13:38
Ответы с готовыми решениями:

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

Вывести названия игрушек, которые подходят детям N лет, и стоимость которых не превышает M.
Создать файл F с информацией про игрушки: название, стоимость, возрастные рамки детей, для которых...

Получить названия игрушек, цена которых не превышает 4 рублей и которые подходят детям до 5 лет
Помогите , пожалуйста, решить задачку на записи ....помогите девушке:-[ Пусть дан массив,...

Получить названия игрушек, цена которых не превышает 4 руб. и которые подходят детям 5 лет
«Работа с файлами» В качестве результата работы высылать программу и файл данных Дан файл F,...

Получить названия игрушек, которые подходят детям как четырех лет, таи и десяти лет
2. Дан файл Assort, содержащий сведения об игрушках: указывается название игрушки, ее стоимость в...

5
ZX Spectrum-128
Модератор
Эксперт Pascal/Delphi
4037 / 2959 / 3699
Регистрация: 05.06.2014
Сообщений: 14,655
24.11.2014, 14:46 2
Вывести названия игрушек, которые подходят детям N лет, и стоимость которых не превышает M.
0
Mylene
0 / 0 / 0
Регистрация: 18.11.2014
Сообщений: 10
27.11.2014, 17:08  [ТС] 3
нужно сделать это с помощью записей, а не файлов
0
ZX Spectrum-128
Модератор
Эксперт Pascal/Delphi
4037 / 2959 / 3699
Регистрация: 05.06.2014
Сообщений: 14,655
27.11.2014, 17:26 4
Mylene, а там и так записи. Уберите работу с файлами, сделайте ввод в массив записей. Делов-то
0
Mylene
0 / 0 / 0
Регистрация: 18.11.2014
Сообщений: 10
01.12.2014, 16:56  [ТС] 5
Цитата Сообщение от ZX Spectrum-128 Посмотреть сообщение
там
если бы я знал как это сделать...
0
ZX Spectrum-128
Модератор
Эксперт Pascal/Delphi
4037 / 2959 / 3699
Регистрация: 05.06.2014
Сообщений: 14,655
01.12.2014, 19:09 6
Лучший ответ Сообщение было отмечено Mylene как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
const
  n_toys=2;
type
  toy = record
  naim: string; //наименование
  stoim: integer; //цена
    age: record //рамки возраста
      ot,ddo: integer; //от .. до .. лет
    end;
end;
 
var
  a: array[0..n_toys] of toy; //массив записей
  i,n,m: integer; //цикл, возраст ребенка, желаемая стоимость
 
BEGIN
  write('введите возраст ребенка: ');
  readln(n);
  write('введите желаемую стоимость игрушки: ');
  readln(m);
  for i:=0 to n_toys do
    begin
      write('наименование: ');
      readln(a[i].naim);
      write('цена: ');
      readln(a[i].stoim);
      write('минимальный возраст: ');
      readln(a[i].age.ot);
      write('максимальный возраст: ');
      readln(a[i].age.ddo);
    end;
  for i:=0 to n_toys do
    begin
      write('наименование: ');
        writeln(a[i].naim);
        write('цена: ');
        writeln(a[i].stoim);
        write('минимальный возраст: ');
        writeln(a[i].age.ot);
        write('максимальный возраст: ');
        writeln(a[i].age.ddo);
        writeln;
      end;
  writeln('подходящие игрушки:');
  for i:=0 to n_toys do
    if (n>=a[i].age.ot) and (n<=a[i].age.ddo) and (m>=a[i].stoim) then
      writeln(a[i].naim);
  readln;
END.
1
01.12.2014, 19:09
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
01.12.2014, 19:09

Получить названия игрушек, которые подходят детям как четырех так и десяти лет
пожалуйсиа помагите Дан файл assort содержащий сведения об игрушках.указываются названия...

Вывести названия игрушек, которые подходят детям от 1 до 3 лет
1)Создать файл содержащий сведения об ассортименте игрушек в магазине. Структура записи: название...

Вывести названия игрушек, которые подходят детям N лет
Вот задача: Создать файл Ф с информацией про игрушки: название, стоимость, возрастные рамки детей,...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
6
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru