Тема моей курсовой роботы: это грузо-перевозки

23.04.2012, 22:02. **Показов** 877. **Ответов** 1

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

Привет народ,как вы поняли из названия У меня курсач, и чем быстрее я его зделаю тем будет лутше

Тема моей курсовой роботы: это грузо-перевозки,Мне нужно создавать определьоную Запись(в файле) за поезку машыны в населеный пункт, где будет дата(выезда)откуда куда(Населеный пункт Название)Растояние,Вес,Цена за тонну, Выручка, Зарплата водителю ДТ(диз топливо) и прибыль.
Я не знаю как создать файл и записи в нем.

@olegoner · 24.04.2012, 15:24

var
f: filetext;

assignfile(f,'имя файла');
rewrite(f);//если хотите заново создать файл? при этом прежние данные уничтожатся
append(f);//если хочешь записать в конец имеющегося файла, добавить информацию.
write(f,переменна которую пишешь);//запись
writeln(f,переменна которую пишешь);//запись с переводом строки
closefile(f);

Fortran645
		1
	Тема моей курсовой роботы: это грузо-перевозки 23.04.2012, 22:02. Показов 877. Ответов 1 Метки нет (Все метки) Привет народ,как вы поняли из названия У меня курсач, и чем быстрее я его зделаю тем будет лутше Тема моей курсовой роботы: это грузо-перевозки,Мне нужно создавать определьоную Запись(в файле) за поезку машыны в населеный пункт, где будет дата(выезда)откуда куда(Населеный пункт Название)Растояние,Вес,Цена за тонну, Выручка, Зарплата водителю ДТ(диз топливо) и прибыль. Я не знаю как создать файл и записи в нем.

@olegoner 162 / 76 / 21 Регистрация: 22.04.2012 Сообщений: 221
	24.04.2012, 15:24	2
	var f: filetext; assignfile(f,'имя файла'); rewrite(f);//если хотите заново создать файл? при этом прежние данные уничтожатся append(f);//если хочешь записать в конец имеющегося файла, добавить информацию. write(f,переменна которую пишешь);//запись writeln(f,переменна которую пишешь);//запись с переводом строки closefile(f); 0