C++ programavimo kalba ir dvimatis masyvas

2.L4.Dvimatis masyvas 2.1. Užduotis L4-4 Faile duoti duomenys apie traukinių maršrutus. Turime n traukinių maršrutų ir m reisų per dieną. Masyve A(n, m) yra surašytas kiekvienam reisui parduotų bilietų kiekis. Kokiam maršrutui buvo parduota daugiausiai bilietų. Sudarykite m reisų, į kuriuos buvo parduota daugiausiai bilietų, sąrašą, ir nurodykite traukinio maršrutą ir parduotų bilietų skaièių. Sąrašui sudaryti naudokite vienmačius masyvus. 2.2. Programos aprašymas 2.2.1. TForm1 klasės paveikslas ir paaiškinimai Komponento vardas Paskirtis Form1 Pagrindinė programos forma Button1 Mygtukas, matricai įvesti iš failo į StringGrid1, naudojant OpenDialog1 Button2 Mygtukas, išvesti į failą iš StringGrid1 ir Memo1, naudojant SaveDialog1 Button3 Mygtukas, atlikti veiksmams pagal užduotį Button4 Mygtukas, StringGrid1 ir Memo1 išvalymui Button5 Mygtukas, programos darbui baigti Timer1 Proceso greičiui kontroliuoti Memo1 skaičiavimo rezultatams parodyti StringGrid1 Pradiniams duomenims parodyti StatusBar1 Komentarų langelis OpenDialog1 Sukurti Open dialogo langą failui atidaryti SaveDialog1 Sukurti Save dialogo langą failui išsaugoti Komponentų keičiamų savybių lentelė Komponento pavadinimas Savybė Reikšmė Form1 Caption „Traukiniu bilietai“ Button1 Caption „Atidaryti“ Button2 Caption „Saugoti“ Button3 Caption „Skaičiuoti“ Button4 Caption „Isvalyti“ Button5 Caption „Baigti“ Memo1 ScrollBars ssVertical Timer1 Interval 1 2.2.2. TForm1 klasė – failas Unit.h #ifndef Unit1H #define Unit1H //--------------------------------------------------------------------------- #include #include #include #include #include #include #include #include #include #include using namespace std; const int CMaxEil=20; const int CMaxSt=20; bool Startup=true; bool dir=true; char *fd, *fr, *slide, *nera="Duomenu failas nerastas", *stpr="Paspauskite mygtuka \"Atidaryti\"", *oppr="Nurodykite tekstini faila", *ok="Duomenys ikelti is failo: ", *out="Skaiciavimo rezultatai faile: ", *del="Svaru", *maxt="Daugiausia buvo parduota:", *line="-----------------------------------------"; //--------------------------------------------------------------------------- class TForm1 : public TForm { __published: // IDE-managed Components TButton *Button1; TButton *Button2; TButton *Button3; TButton *Button4; TButton *Button5; TBevel *Bevel1; TStatusBar *StatusBar1; TOpenDialog *OpenDialog1; TSaveDialog *SaveDialog1; TTimer *Timer1; TStringGrid *StringGrid1; TMemo *Memo1; void __fastcall Button5Click(TObject *Sender); void __fastcall Button1Click(TObject *Sender); void __fastcall Button3Click(TObject *Sender); void __fastcall Button4Click(TObject *Sender); void __fastcall Timer1Timer(TObject *Sender); void __fastcall Button2Click(TObject *Sender); void __fastcall FormActivate(TObject *Sender); private: // User declarations int A[CMaxEil][CMaxSt], //pradiniu duomenu masyvas B[CMaxEil], //eiluciu suma n, //eiluciu skaicius masyve m, //stulpeliu skaicius masyve move, lenght; void info(char[]); void Ivesti(char*); void Isvesti(char*); void MatricosAtvaizdavimas(); void RastiSuma(); void RastiMaxEil(); void RastiMaxSt(); public: // User declarations __fastcall TForm1(TComponent* Owner); }; //--------------------------------------------------------------------------- extern PACKAGE TForm1 *Form1; //--------------------------------------------------------------------------- #endif 2.2.3. Metodų aprašai void TForm1::SpausdintiFloatMatr(double X[Cmax][Cmax], int k, int l, const char *fv, char *mv, bool pap) Paskirtis: rasti matricoje didžiausią reikšmę ir nustatyti jos buvimo vietą. Parametrai: 1) X dvimatis masyvas; 2) k elementų masyve kiekis; 3) l elementų masyve kiekis; 4) fv duomenų failo vardas; 5) mv matricos pavadinimas; 6) bool pap perrašyti ar papildyti failą. Pradžia SpausdintiFloatMatr(double X[Cmax][Cmax], int k, int l, const char *fv, char *mv, bool pap) Įvedimo srautas fr; t pap n Atidaryti failą papildymui Atidaryti failą Spausdinti mv, „:\n\n“ int j = 0; (6 * l) + 3 Spausdinti “-“ Spausdinti “\n|NR|” int i = 0; l - 1 Spausdinti setw(5), i + 1, “|” int i = 0; k – 1 Spausdinti “\n|” int j = 0; (6 * l) + 1; Spausdinti “-“ Spausdinti “|\n|”, setw(2), i + 1, “|”; int j = 0; l – 1 Spausdinti setw(5), setprecision(2), X[i][j], “|” Pereiti į kitą eilutę (fr) int j = 0; j max; n max = X[i][j]; t = 1; s = j; Pabaiga void TForm1::KurieSekmingi(double X[Cmax][Cmax], int k, int l, int Y[Cmax], int &p) Paskirtis: į masyvą surašyti visus sportininkus, kurių visi bandymai buvo sėkmingi. Parametrai: 1) X dvimatis masyvas; 2) k elementų masyve kiekis; 3) Y masyvas; 4) p grąžinamas sportininkų, kurių visi bandymai sėkmingi, skaičius. Pradžia KurieSekmingi(double X[Cmax][Cmax], int k, int l, int Y[Cmax], int &p) p = 0; bool s; i = 0, k - 1 j = 0, l - 1 s = true; j = 0; l - 1 t Fabs(X[i][j]) == 0 s = false; n t s n Y[p] = i; p++ Pabaiga Metodas "SpausdintiRez" - į failą įrašo skaičiavimų rezultatus void TForm1::SpausdintiRez(double X[Cmax][Cmax], int k, int l, int t, int s, int Y[Cmax], int p, const char *fv, bool pap) Paskirtis: įrašyti į rezultatų failą skaičiavimų rezultatus. Parametrai: 1) X dvimatis masyvas; 2) k elementų masyve kiekis; 3) l elementų masyve kiekis; 4) t laimėjusio sportininko numeris; 5) s laimėjusio sportininko sėkmingiausio bandymo numeris; 6) Y masyvas; 7) fv duomenų failo vardas; 8) bool pap perrašyti ar papildyti failą. p grąžinamas sportininkų, kurių visi bandymai sėkmingi, skaičius. Pradžia SpausdintiRez(double X[Cmax][Cmax], int k, int l, int t, int s, int Y[Cmax], int p, const char *fv, bool pap) Atidaromas failas (fr); t pap n Atidaryti failą papildymui Atidaryti failą Spausdinti “Laimėjo sportininkas numeris,“ t + 1, “, jo geriausias rezultatas: “, setw(5), setprecision(2), X[t][s]; Spausdinti “\n\nSportininkų, kurių visi bandymai sėkmingi, sąrašas: \n\n“; int i = 0; p – 1 Spausdinti “Sportininkas numeris “, Y[i] + 1 Pereiti kitą eilutę Uždaryti fr Pabaiga 2.3 Programos tekstas (TForm1 klasė – failas Unit1.cpp) #pragma hdrstop #include

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!