Контрольная работа: Знаходження кусково-постійних конфігурацій множин

#include <vcl.h>

#pragma hdrstop

#include "Unit1.h"

//---------------------------------------------------------------------------

#pragma package(smart_init)

#pragma resource "*.dfm"

TForm1 *Form1;

//---------------------------------------------------------------------------

__fastcall TForm1::TForm1(TComponent* Owner)

: TForm(Owner)

{

}

//---------------------------------------------------------------------------

#include "stdio.h"

int n=1, Pn=0;

int f(int n)

{

int r=1;

for(int i=1;i<=n;++i)

{

r=r*i;

}

return r;

}

int A(int n, int k)

{

return f(n)/f(n-k);

}

void __fastcall TForm1::Button1Click(TObject *Sender)

К-во Просмотров: 219
Бесплатно скачать Контрольная работа: Знаходження кусково-постійних конфігурацій множин