-Поиск по дневнику

Поиск сообщений в Gf_ab

 -Подписка по e-mail

 

 -Статистика

Статистика LiveInternet.ru: показано количество хитов и посетителей
Создан: 23.10.2008
Записей: 7
Комментариев: 1
Написано: 37

Together






Без заголовка

Четверг, 09 Апреля 2009 г. 00:58 + в цитатник
// ololo.cpp : Defines the entry point for the console application.
//

#include "stdafx.h"
#include
#include
#include


long Jd(int year, int month, int day)
{
int Grig = 0; // григорианская ли это дата?
if (year > 1582) Grig = 0; else
if (year < 1582) Grig = 1; else
if (month > 10) Grig = 0; else
if (month < 10) Grig = 1; else
if (day >= 15) Grig = 0; else Grig = 1;
if (month <= 2) { year--; month += 12; };
unsigned long J;
int A;
if (Grig == 0){A= year/100; A = 2 - A + (A / 4) ;}
else A=0;
J = 1461 * year /4 ;
unsigned long K =306001*(month + 1);
K /= 10000;
J += K + day + 1720995 + A; return J;
};


void GDate (long JD, int& y, int& m, int& d)
{
unsigned long A=(JD*4-7468865)/146097;
A=(JD > 2299160)? JD+1(A/4): JD;
long B=A+1524;
long C=(B*20-2442)/7305;
long D=(C*1461)/4;
long E=(10000*(B-D))/306001;
d=int (B-D-((E*306001)/10000)) ;
m= (E<=13) ? E-1 : E-13 ;
y= C - ((m>2) ? 4716 : 4715 );
};

void EasterOrthodox (int year, int&mm, int&dd)
{
int a = year % 4;
int b = year % 7;
int с = year % 19;
int d = (19 * с + 15) % 30;
int e = (2 * a + 4 * b - d + 34) % 7;
a = d+e+114;
mm = a / 31;
dd = a % 31 +1;
if (year > 1582) {
d = 10 + ((year / 100 - 15) * 3) / 4;
dd +=d;
if ((mm == 3) && (dd > 31) )
{dd -= 31;mm++;} else
if ((mm == 4) && (dd>30)) {dd -= 30; mm++;}
};
};
void EasterCatholic (int year, int&mm, int&dd)
{
if (year <= 1582)
{
EasterOrthodox(year,mm,dd);
return;
}
int a = year % 19;
int b = year / 100;
int c = year % 100;
int g = (b - (b + 8) / 25 + 1) / 3;
int h = (19 *a b/4-g+15)%30;
int l = (32 + 2 * (b % 4)+2*(c/4)-h-(c%4))%7;
mm = (a + 11 * h + 22 * 1) / 451;
mm = h + 1 - 7 * mm + 114;
dd = mm % 31 + 1; mm /= 31;
};

int main()
{

}


Понравилось: 12 пользователям

Без заголовка

Среда, 25 Марта 2009 г. 01:23 + в цитатник
впадлу, а.. реально впадлу.

+2))

Среда, 18 Марта 2009 г. 00:59 + в цитатник
// .cpp : Defines the entry point for the console application.
//

#include "stdafx.h"

struct item //
{
int data;
item* point;
};


void got (int,int); //прототип функции обработки данных из входного файла


// Глобальные переменные - их функция обработки типа операции будет использовать
int i=0, num_add, num_iadd, num_del, num_idel, N;
item *first=0, *tek; //последний и новый

int _tmain(int argc, _TCHAR* argv[])
{


FILE* in; // текстовый файл
FILE* out;
int x=1, el; //тут мы храним тип и содержание операции из входного файла перед обработкой

out = fopen( "output.txt", "wt" );//Создание выходного файла
if ( out == NULL ) {printf( "Bad output\n" ); getchar(); return 1;}

in = fopen( "input.txt", "rt");//Открытие входного файла
if ( in == NULL ) {printf( "Bad input\n" ); getchar(); return 1;}



if (fscanf(in,"%d", &N)==NULL){fprintf(out,"Bad input(No N)\n"); return 1;};
if (N < 1) { fprintf(out,"Bad input(N<1)\n"); return 1; } //Считываем число элементов

while ((x!=0)&&(!feof( in )))
{
if (fscanf(in, "%d", &x)==NULL){fprintf(out,"Bad input(No N)\n"); return 1;};
if (x==2) //Если попалось исключение
{
got(x,0); //то сразу его и обрабатываем
}
else //если же добавление,
{
if (fscanf(in, "%d", &el)==NULL){fprintf(out,"Bad input(No N)\n"); return 1;}; //то сначала почитаем содержимое, для вставки
got(x,el); // а теперь обработаем его
}

};
fclose( in ); // закрыть файл

//выводим все требуемые надписи
fprintf(out,"ВЫПОЛНЕНО %d ОПЕРАЦИЙ ВКЛЮЧЕНИЯ В СТЕК\n", num_add);
fprintf(out,"ПРОИГНОРИРОВАНО %d ОПЕРАЦИЙ ВКЛЮЧЕНИЯ В СТЕК\n", num_iadd);
fprintf(out,"ВЫПОЛНЕНО %d ОПЕРАЦИЙ ИСКЛЮЧЕНИЯ ИЗ СТЕКА\n", num_del);
fprintf(out,"ПРОИГНОРИРОВАНО %d ОПЕРАЦИЙ ИСКЛЮЧЕНИЯ ИЗ СТЕКА\n", num_idel);
fprintf(out,"УКАЗАТЕЛЬ СТЕКА %d\n", i);
i=0;
tek=first;
while (tek)
{
fprintf(out,"%d\n", tek->data);
i++;
tek=tek->point;
};
fclose( out ); // закрыть файл
delete first; delete tek;

return 0;
}
void got (int type, int cont) //обработка входных данных
{
if (type==1) // вставка
{
if (i/и стек не заполнен
{
tek = new item; //заполняем
tek->data=cont;
tek->point=first;
first=tek;


i++; //увеличиваем текущий размер
num_add++; //считаем количесво успешных добавлений
}
else //если стек уже полон,
{
num_iadd++; //ничего не делаем, только считаем количесвто неудачных добавлений
}
}
else
{
if (type==2) //исключение из стека
{
if (i!=0) //и стек не пустой
{
i--; //уменьшаем размер, а заодно и указатель стека
tek=first;
first=first->point;
delete tek;
num_del++; //считаем удачные исключения
}
else // пустой стек
{
num_idel++; //считаем неудачные исключения
}
}
}
return;
}

+1

Вторник, 17 Марта 2009 г. 23:59 + в цитатник
#include "stdafx.h"
#include

void ins(int);
void del();
int stk[20],N,num_add,num_iadd,num_del,num_idel,i;

int main()
{
FILE* out; // входной файл
FILE* in; //выходной файл

int x,el;



out = fopen( "output.txt", "wt" );//Создание выходного файла
if ( out == NULL ) {printf( "Bad output\n" ); getchar(); return 1;}

in = fopen( "input.txt", "rt");//Открытие входного файла
if ( in == NULL ) {printf( "Bad input\n" ); getchar(); return 1;}

if (fscanf(in,"%d", &N)==NULL){fprintf(out,"Bad input(No N)\n"); return 1;};
if (N < 1) { fprintf(out,"Bad input(N<1)\n"); return 1; } //Считываем число элементов
i=0;
do
{
if (fscanf(in,"%d", &x)==NULL){fprintf(out,"Bad input(wrong data)\n"); return 1;};
if (x!=0 && x!=1 && x!=2){ fprintf(out,"Bad input(wrong data)\n"); return 1;}
switch(x)
{
case 1:if (fscanf(in,"%d", &el)==NULL){fprintf(out,"Bad input(wrong data)\n"); return 1;};ins(el); break;
case 2:del(); break;
}


}
while (x!=0 &&(!feof( in )));
fprintf(out,"ВЫПОЛНЕНО %d ОПЕРАЦИЙ ВКЛЮЧЕНИЯ В СТЕК\n", num_add);
fprintf(out,"ПРОИГНОРИРОВАНО %d ОПЕРАЦИЙ ВКЛЮЧЕНИЯ В СТЕК\n", num_iadd);
fprintf(out,"ВЫПОЛНЕНО %d ОПЕРАЦИЙ ИСКЛЮЧЕНИЯ ИЗ СТЕКА\n", num_del);
fprintf(out,"ПРОИГНОРИРОВАНО %d ОПЕРАЦИЙ ИСКЛЮЧЕНИЯ ИЗ СТЕКА\n", num_idel);
fprintf(out,"УКАЗАТЕЛЬ СТЕКА %d\n", i);
i=0;
while (i!=N)
{
i++;
fprintf(out,"%d\n", stk[i]);

};
fclose( out ); // закрыть файл
return 0;
}
void ins(int cont)
{

if (i/и стек не заполнен
{
i++; //увеличиваем текущий размер
stk[i]=cont; //заполняем
num_add++; //считаем количесво успешных добавлений
}
else //если стек уже полон,
{
num_iadd++; //ничего не делаем, только считаем количесвто неудачных добавлений
}
return;
};
void del()
{
if (i!=0) //и стек не пустой
{
stk[i]=0; //удаляем элемент
i--; //уменьшаем размер, а заодно и указатель стека
num_del++; //считаем удачные исключения
}
else // пустой стек
{
num_idel++; //считаем неудачные исключения
}
return;
}

УРА

Воскресенье, 22 Февраля 2009 г. 16:44 + в цитатник
#include
#include
#include "stdafx.h"

int litc( char cur ) {
int lit_cl =8;
if (cur >= '0' && cur <= '6') lit_cl = 1;
if (cur == '.') lit_cl = 2;
switch(cur)
{
case '.': lit_cl=2; break;
case 'B': lit_cl=3; break;
case 'E': lit_cl=4; break;
case 'G': lit_cl=5; break;
case 'I': lit_cl=6; break;
case 'N': lit_cl=7; break;
}
return lit_cl;
}

int main()
{
FILE* out; // входной файл
FILE* in; //выходной файл
char ch;
char *list[5] = { "", "целое семиричное без знака", "вещественное семиричное без знака", "ошибка","слово BEGIN"};
int st,pip;
int tablets[10][8]={
{2,4,5,0,0,0,0,10},
{2,3,0,0,0,0,0,0},
{3,0,0,0,0,0,0,0},
{3,0,0,0,0,0,0,0},
{0,0,0,6,0,0,0,0},
{0,0,0,0,7,0,0,0},
{0,0,0,0,0,8,0,0},
{0,0,0,0,0,0,9,0},
{0,0,0,0,0,0,0,0},
{0,0,0,0,0,0,0,0}
};
out = fopen( "output.txt", "wt" );
if ( out == NULL ) {printf( "Bad output\n" ); getchar(); return 1;}

in = fopen( "input.txt", "rt");
if ( in == NULL ) {printf( "Bad input\n" ); getchar(); return 1;}

fread(&ch,1,1,in);
st=1;
while (!feof(in))
{
if (st!=1)
{
if ( ch != '\n') {fprintf(out,"%c",ch);}
else { fprintf(out, "/n"); }
fread(&ch, 1, 1, in);}
int cl=litc(ch);
pip=tablets[st-1][cl-1];
if (pip == 0)
{
if (st<=8 && st>=5) st=4;
if(st==9)st=5;
if (st==10)st=4;

fprintf(out, " - %s\n", list[st-1]);
st = 1;
}
else st = pip;

}
if (pip != 0) {
fprintf(out, " - %s\n", list[st-1]);}


fclose(in);
fclose(out);

return 0;
}

Повар

Пятница, 23 Января 2009 г. 02:20 + в цитатник
плахой повар из вас, мистер Па. лени в вас слишком уж много. но если дать стимул вы можете сделать шедевр, и вы знаете это... где взять стимул?
повар жизни...

Дневник Gf_ab

Четверг, 23 Октября 2008 г. 13:36 + в цитатник
Книга №4


Поиск сообщений в Gf_ab
Страницы: [1] Календарь