//--------------------------------------------------------------------------- #ifndef Unit1H #define Unit1H //--------------------------------------------------------------------------- #include #include #include #include const int CKiek = 30; //elementu kiekis masyve const char *CDuom = "duomenys.txt"; //duomenu failo vardas //const char *CRez = "rez.txt"; //rezultato failo vardas const char *DDuom = "duomenys2.txt"; const char CRfv[] = "Rezultatai.txt"; //Rezultatu failas //--------------------------------------------------------------------------- class TForm1 : public TForm { __published: // IDE-managed Components TMemo *Memo1; //rezultatu langas TButton *Button1; TButton *Button2; TButton *Button3; TButton *Button4; void __fastcall Button1Click(TObject *Sender); void __fastcall Button2Click(TObject *Sender); void __fastcall Button3Click(TObject *Sender); void __fastcall Button4Click(TObject *Sender); private: // User declarations int A[CKiek], B[CKiek], n, //masyvo A elementu kiekis z, //masyvo B elementu kiekis k, max1, max1v, max2, max2v; bool Duomenys(); //tikrina ar masyvai ivesti bool Ivedimas( const char * failoVardas, int A[], int &k); //iveda void Skaityti(); //nuskaito duomenys is failo void RastiMax1(); //randa maksimale reiksme void RastiMax2(); //randa maksimale reiksme void Saugoti1( int A[], int n, char * masv); //saugo rezultatus i faila void Parodyti1(); //parodo rezultatus ekrane void RastiSum(); //Randa suma void Parodyti2(); //parodo rezultatus ekrane //masyva public: // User declarations __fastcall TForm1(TComponent* Owner); }; //--------------------------------------------------------------------------- extern PACKAGE TForm1 *Form1; //--------------------------------------------------------------------------- #endif