Особые свойства Гамма-функции Эйлера

For9i=1;i<n,i++)

{

Dx=(4.0*i)/n;

Dy=gam(dx,1e-3);

X=30+(600/0*i)/n;

Y=450-84*dy;

If(Y<30) continue;

Lineto (X,Y);

}

X=30+150.0*308523;

Lineto(X,30);

Line (30,30,30,10);

Line(620,450,640,450);

Line(30,10,25,15);

Line(30,10,25,15);

Line(640,450,635,445);

Line(640,450,635,455);

Line(170,445,170,455);

Line(320,445

,320,455);

Line(470,445,470,455);

Line(620,445,620,455);

Line(25,366,35,366);

Line(25,282,35,282);

Line(25,114,35,114);

Line(25,30,35,30);

Outtexty(20,465,"0");

Outtexty(165,465, "1";

Outtexty(315,465, "2";

Outtexty(465,465, "3";

Outtexty(615,465, "4";

Outtexty(630,465, "x";

Outtexty(15,364, "1";

Outtexty(15,280, "2";

Outtexty(15,196, "3";

Outtexty(15,112, "4";

Outtexty(15,30, "5";

Outtexty(15,10, "y";

Getch()

}

 Скачать реферат