Форум программистов [Powered by Invision Power Board]

Код

#include <Pilgrim.h>

#include<io.h>                     // для функции creat()                               < ---- ВЫЗОВ
#include<fstream.h>          // потоковый класс                                    < ---- ВЫЗОВ
#include<sys\stat.h>        // значения парметров amode             < ---- ВЫЗОВ
#include<iomanip.h>       //манипулятор ввода-вывода               < ---- ВЫЗОВ
#include<float.h>               //константы предельных знfчений     < ---- ВЫЗОВ


#define N 2
forward
{ 
int fileNumb*creat("C:\\Documents and Settings\\NickNick\\Мои документы \\ My Classes\\"
                   "Курсы\\ИМЭП\\Практикум\\Модель_АЗС\\01.txt", S_IWRITE);
//Журнал трассировки
ofstream fileOut ;  //выходной файловый поток
fileOut.attach (fileNumb); //присоединение потока к файлу
int fv;
modbeg("Модель 3", 107, 1000, (long)1234567890, none , none , none,none    2);
ag("Приезды",   101, none,expo, 5,none,none, 103);
network(dummy, dummy)
{
top(103):
        fileOut << "\n"  <<setw(10) << timer << "102-Приехал $"<< t->tn <<" tn= <<addr[105]->tn;
if (  addr[105]->tn**N)
fw=104;
else
fw=105;
key("Обслужить?" ,  fw);
place;
top (104):
fileOut << "\n" << timer << "104-Отказ #" << t->tn;
term ("Уехавшие");
place;

top (105):
fileOut << "\n"<< timer << " 105-Колонка #" << t->tn;
serv ("Колонки",N,none,expo,6,none,none,106);
place;

top (106):
fileOut << "\n" << timer << "106-Обслужен #" << t->tn;
term ("Обслуженные");
place;
fault (123);
}
modend ("АЗС.rep", 1,8,page);
return 0;
}