Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
 Аватар для Yokano
1 / 1 / 0
Регистрация: 01.03.2014
Сообщений: 67

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

23.11.2015, 11:42. Показов 990. Ответов 0
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Здравствуйте) Помогите пожалуйста с решением задачи(Типизированные файлы:файлы записи): Дан файл, содержащий сведения об игрушках: указывается название игрушки, ее стоимость в рублях и возрастные границы (например, игрушка может предназначаться для детей от двух до пяти лет).
Программа содержания файла:
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
Type
    Student = record
            f: string[20];
            i: integer;
            n: byte;
            k: byte;
            end;
    fr= file of Student;
procedure inp_f(var a: fr);
var i, n: byte; b: student;
begin
    write('Сколько игрушек n? '); readln(n); rewrite(a);
    for i:=1 to n do
    begin
        write('Название', i, '-ой игрушки: '); 
        readln(b.f);
        write('Цена ', i, '-ой игрушки: '); 
        readln(b.i);
        write('Начало возрастной границы ', i, '-ой игрушки: '); 
        readln(b.n);
                write('конец возрастной границы ', i, '-ой игрушки: '); 
        readln(b.k);
        write(a,b);
    end;
    close(a);
end;
 
var f: fr; s: string[20]; 
begin
    write('Имя файла? '); readln(s);
    assign(f, s);
    inp_f(f);
end.
Решение задачи:
type
  foс = file of char;
procedure outp_f(var f: foi);
var
  a: char;
begin
  reset(f);
  while not eof(f) do
  begin
    read(f, a);
    write(a);
  end;
  writeln;writeln;close(f);
end;
Получить названия игрушек, которые подходят детям как четырех лет, так и десяти лет.
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
23.11.2015, 11:42
Ответы с готовыми решениями:

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

Запишите в файл названия и цену игрушек, которые подходят детям указанного возраста
Создать файл F.txt, содержащий сведения об игрушках: в каждой строке указывается четырехзначный артикул изделия, название игрушки, ее...

Определить название игрушек, цена которых не превышает 4 руб и которые подходят детям 5 лет
Помогите, пожалуйста доделать. Как найти игрушки стоимостью меньше 4 и для возраста подходящие? И как в ответ это вывести? Дан файл f,...

0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
23.11.2015, 11:42
Помогаю со студенческими работами здесь

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

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

Получить название игрушек, которые подходят как для 4-х лет, так и для 10-ти лет
Помогите решить задачу в Paskal по теме типизированные файлы. Буду очень благодарна. Получить название игрушек, которые подходят как для...

Получить названия игрушек для детей от 4 до 10 лет
народ помогите плз. решите задание- 2 фото-в 1 фото дано само задание (там их несколько-мне нужно только первое-заканчивается на "10...

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


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

Или воспользуйтесь поиском по форуму:
1
Ответ Создать тему
Новые блоги и статьи
Переходник USB-CAN-GPIO
Eddy_Em 20.03.2026
Достаточно давно на работе возникла необходимость в переходнике CAN-USB с гальваноразвязкой, оный и был разработан. Однако, все меня терзала совесть, что аж 48-ногий МК используется так тупо: просто. . .
Оттенки серого
Argus19 18.03.2026
Оттенки серого Нашёл в интернете 3 прекрасных модуля: Модуль класса открытия диалога открытия/ сохранения файла на Win32 API; Модуль класса быстрого перекодирования цветного изображения в оттенки. . .
SDL3 для Desktop (MinGW): Рисуем цветные прямоугольники с помощью рисовальщика SDL3 на Си и C++
8Observer8 17.03.2026
Содержание блога Финальные проекты на Си и на C++: finish-rectangles-sdl3-c. zip finish-rectangles-sdl3-cpp. zip
Символические и жёсткие ссылки в Linux.
algri14 15.03.2026
Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая ссылка» (hard link),. . .
[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора
ФедосеевПавел 14.03.2026
Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .
делаю науч статью по влиянию грибов на сукцессию
anaschu 13.03.2026
прикрепляю статью
SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++
8Observer8 10.03.2026
Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:
Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE
8Observer8 10.03.2026
Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru