Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
IvanReverse
0 / 0 / 1
Регистрация: 24.04.2012
Сообщений: 23
#1

Записи и Типизированные файлы. Информация о наличии товаров - Pascal ABC

10.05.2012, 17:48. Просмотров 387. Ответов 1
Метки нет (Все метки)

Файл содержит информацию о наличии товаров: название товара, цена единицы товара, количество, датавыпуска, конечная дата использования. Составить программу вывода на экран
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
10.05.2012, 17:48
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Записи и Типизированные файлы. Информация о наличии товаров (Pascal ABC):

Записи и Типизированные файлы Семья ежедневно записывает свои расходы в файл
Тема: Записи и Типизированные файлы Семья ежедневно записывает свои расходы в...

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

Записи и типизированные файлы. Структура: : наименование, страна-импортер, стоимость и объем
Дан файл, содержащий сведения об экспортируемых товарах: наименование товара,...

Записи и Типизированные файлы. Структура: фамилия, дата зачисления в штат, название отдела, должность, оклад
Всем привет! Помогите с программой на PascalABC Создать файл, содержащий...

Типизированные файлы, записи.
Пожалуйста помогите с такой задачей: Известно,что при формировании файла...

Записи и типизированные файлы.
Всё, что написано в книге! Задачи раздела направлены как на приобретение...

1
kloks
54 / 54 / 30
Регистрация: 08.05.2012
Сообщений: 162
10.05.2012, 18:26 #2
Лучший ответ Сообщение было отмечено IvanReverse как решение

Решение

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
program zhzh;
type Ttovar = record
         nazvanie : string;
         cena : integer;
         colvo : integer;
         data : string;
         kondata : string;
       end;
var tovar : Ttovar;
     f : File of Ttovar;
 
procedure PrintTovar(Tovar : TTovar);
begin
  with Tovar do
  begin
    writeln(nazvanie);
    writeln(cena);
    writeln(kolvo);
    writeln(data);
    writeln(kondata);
  end;
end;
 
begin
  AssignFile(f, '1.dat');
  reset(f);
  while not eof(f) do
  begin
    read(f, tovar);
    PrintTovar(tovar);
  end;
  readln;
  CloseFile(f);
end.
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
10.05.2012, 18:26
Привет! Вот еще темы с решениями:

Записи.Типизированные файлы
Помогите плиз,никак не могу сделать . Составить программу, которая содержит...

Записи, типизированные файлы.
ребят помогите,вот условие: Багаж пассажира характеризуется количеством вещей...

Записи и типизированные файлы
Тема: "Записи и типизированные файлы" Смысл задачи такой, что в первой...

Типизированные файлы, удаление записи по номеру
Ребята пожалуйста помогите мне с задачей. Она у меня пралильная, нужно только...


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

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

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