Vienmačio masyvo maksimalus elementas

Duotas realių skaičių masyvas X(n). Už masyvo maksimalaus elemento įterpti paskutinio teigiamo elemento reikšmę. Pakartoti šiuos veiksmus masyvui Y(k). 1.2 Programos aprašymas 1.2.1 Duomenų tipai ir konstantos const char *CDuomX = "DuomenysX.txt"; // Masyvo X[n] duomenų failo vardas const char *CDuomY = "DuomenysY.txt"; // Masyvo Y[k] duomenų failo vardas const char *CRez = "Rezultatai.txt"; // Rezultatų failo vardas const int CKiek = 30; // Elementų kiekis masyve 1.2.2 TForm1 klasės aprašymas • TForm1 klasės paveiksas ir paaiškinimai • Komponentų paskirtis Vardas Paskirtis Form1 Pagrindinė programos forma ListBox1 Langas skirtas pradiniams X(n) duomenims parodyti ListBox2 Langas skirtas modifikuotiems Y(k) duomenims parodyti ListBox3 Langas skirtas modifikuotiems X(n) duomenims parodyti ListBox4 Langas skirtas pradiniams Y(k) duomenims parodyti Label1 Avarinis užrašas: “Masyve per daug narių pakeitimas nebuvo atliktas ” Label2 Užrašas: ”Masyvas X(n)” Label3 Užrašas: ”Masyvas Y(k)” Label4 Užrašas: “Masyvas X(n) pakeistas” Label5 Užrašas: “Masyvas Y(k) pakeistas” Label6 Avarinis užrašas: “Masyve teigiamų narių nėra” Label7 Avarinis užrašas: “Masyve teigiamų narių nėra” Label8 Avarinis užrašas: “Masyve per daug narių pakeitimas nebuvo atliktas ” Button1 Mygtukas, kurį nuspaudus, masyvai nuskaitomi iš failų ir ir parodomi ListBox Button2 Mygtukas, kurį nuspaudus, surandamas masyvo max elementas(jo indeksas), paskutinis teigiamas skaičius ir įvydomas masyvo modifikavimas(teigiamo skaičiaus įterpimas) Button3 Mygtukas, kurį nuspaudus, parodo pakeistus masyvus komponentuose ListBox Button4 Mygtukas, kurį nuspaudus, TForm1 uždaromas ir išsaugomi razultatai faile rezultatai.txt • Klasės tekstas ( Unit1.h ) //------------------------------------------------------------------------------ #ifndef Unit1H #define Unit1H //------------------------------------------------------------------------------ #include #include #include #include const char *CDuomX = "DuomenysX.txt"; // Masyvo X[n] duomenų failo vardas const char *CDuomY = "DuomenysY.txt"; // Masyvo Y[k] duomenų failo vardas const char *CRez = "Rezultatai.txt"; // Rezultatų failo vardas const int CKiek = 30; // Elementų kiekis masyve //------------------------------------------------------------------------------ class TForm1 : public TForm { __published: // IDE-managed Components TListBox *ListBox1; // Pradinis masyvas X[n] TButton *Button1; // Mygtukas įvesti TButton *Button2; // Mygtukas atlikti veiksmus TButton *Button3; // Mygtukas parodantis pasikeitusius masyvus TListBox *ListBox2; // Pakeistas masyvas Y[k] TLabel *Label1; // paaiškinimas (jei masyve neužtenka vietos) TListBox *ListBox3; // Pakeistas masyvas X[n] TListBox *ListBox4; // Pradinis masyvas Y[k] TButton *Button4; // Mygtukas uždarantis TForm1 TLabel *Label2; // Pavadinimas TLabel *Label3; // Pavadinimas TLabel *Label4; // Pavadinimas TLabel *Label5; // Pavadinimas TLabel *Label6; // Jei nėra teigiamų sk. masyve TLabel *Label7; // Jei nėra teigiamų sk. masyve TLabel *Label8; // Paaiškinimas // (jei masyve neužtenka vietos) void __fastcall Button1Click(TObject *Sender); void __fastcall Button2Click(TObject *Sender); void __fastcall Button3Click(TObject *Sender); void __fastcall Button4Click(TObject *Sender); void __fastcall FormActivate(TObject *Sender); private: // User declarations double X[CKiek], // X[n] masyvas Y[CKiek], // Y[k] masyvas maxX, // Didžiausias X[n] masyvo sk maxY, // Didžiausias Y[k] masyvo sk. teigX, // Paskutinis teigiamas masyvo X[n] sk. teigY; // Paskutinis teigiamas Y[k] masyvo sk. int n, // X[n] elementų kiekis k, // Y[k] elementų kiekis maxiX, // Didžiausio X[n] masyvo sk. indeksas maxiY; // Didžiausio Y[k] masyvo sk. indeksas void Skaityti(const char vardas[],int &n, double A[]); // skaito masyvą void Parodyti(int n , double A[] , TListBox *M); // parodo masyvo elementus void Teigiamas( double A[], int n, double &teig,TLabel *G); // randa paskutinį // teigiama skaičių void RastiMax(double A[], int n, double &max, int &maxi); //randa masyvo // maksimumą ir jo indeksą void Iterpimas(double A[],int n, int maxi, double teig, TLabel *F); // įterpia // į masyvą paskutinį teigiamą skaičių void Saugoti(char * masv, double A[],int&n); // saugo rezultatus // faile Rezultatai.txt public: // User declarations __fastcall TForm1(TComponent* Owner); }; //------------------------------------------------------------------------------ extern PACKAGE TForm1 *Form1; //------------------------------------------------------------------------------ #endif • Metodų aprašai void TForm1::Skaityti(const char vardas[],int &n, double A[]) Nuskaito duomenis iš tekstinio failo į masyvą Pradžia Skaityti(const char vardas[],int &n, double A[]) Atidaryti (fd) Nuskaito kiek bus masyve narių   Kol i=0; i

Daugiau informacijos...

★ Klientai rekomenduoja

Šį rašto darbą rekomenduoja mūsų klientai. Ką tai reiškia?

Mūsų svetainėje pateikiama dešimtys tūkstančių skirtingų rašto darbų, kuriuos įkėlė daugybė moksleivių ir studentų su skirtingais gabumais. Būtent šis rašto darbas yra patikrintas specialistų ir rekomenduojamas kitų klientų, kurie po atsisiuntimo įvertino šį mokslo darbą teigiamai. Todėl galite būti tikri, kad šis pasirinkimas geriausias!