у меня экзамен с DATA решите кому не сложно

14.06.2010, 12:59. Показов 530. Ответов 0

Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам

Pascal

type data = record
month:(jan,feb,mar,...dec);
day: 1..31;
end;
fd= file of data;

Описать процедуру zap(d,s,w) от трех файлов типа fd , которая из файла d переписывает в файл s все летние даты, а в файл w все зимние даты

Добавлено через 1 час 6 минут
может кто написать как создается и заполняется сам файл fd типа дата

Добавлено через 1 минуту

Delphi

procedure proc;
var TempGama:gama;
begin
 while not eof(FD) do
  begin
   read(FD,TempGama);
   if (TempGama.month=12) or (TempGama.month<3) then write(FW,TempGama);
   if (TempGama.month>5) and (TempGama.month<9) then write(FS,TempGama);
  end;
end;

это процедура раскидывания файла по файлам
проблема в процедуре описания файла df типа data

Заказать работу у эксперта

Programming

Эксперт

94731 / 64177 / 26122

Регистрация: 12.04.2006

Сообщений: 116,782

14.06.2010, 12:59

Ответы с готовыми решениями:

задача с масивами кому не сложно плз
1)Даны два массива. Оформить в виде программы вычисление максимального из нечетных элементов...

Не могу разобраться с ошибкой. Delphi 7. Кому не сложно укажите где не так. Заранее спасибо
Помогите пожалуйста решить проблему. Гугл не помог Project excel.exe raised exception class...

Народ завтра сдавать экзамен, нужны эти задачи. кому не сложно скиньте код ради бога
1.С помощью программы создать текстовый файл и записать в него в качестве первой строки предложение...

Кому не сложно.)
Ребят, о4ень прошу помощи... Хо4у сделать приятное другу, новый логотип ему сделать хотелось бы,...

	14.06.2010, 12:59

IT_Exp

Эксперт

87844 / 49110 / 22898

Регистрация: 17.06.2006

Сообщений: 92,604

14.06.2010, 12:59

Помогаю со студенческими работами здесь

кому не сложно
вот программа которая находит площадь пересечения прямоугольников #include "stdafx.h" #include...

кому не сложно
Ребят

Поясните кому не сложно
Вопрос первый: Как задействовать следующие функции? Или где их смотреть? Я так понимаю...

Кому не сложно выручите^_^
только 9 вариант,желательно к завтрашнеому вечеру... а то не допустят еще до первого моего...

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

Или воспользуйтесь поиском по форуму:

Наверх