Dvimačio masyvo tyrimas

1. Ataskaita: 2. Programa ir jos veikimas: 3. Duomenų įvedimas ir spausdinimas: 4. Programos gynimo testas: 1.1 Programos užduotis. MTR-1 Duota matrica A(n,m). Sukeisti vietomis kiekvienos eilutės pirmą teigiamą ir tos eilutės didžiausią elementą. Spausdinti matricą prieš ir po pakeitimų. 1.2 Programos aprašymas. a) Programos schema: b) Formos schema: c) Komponentų savybių sąrašas: Vardas Keičiama savybė Reikšmė Label1 Caption Matrica A pries skaiciavimus: Font 14, Bold, Times New Roman Label2 Caption Veiksmu eiga: Font 14, Bold, Times New Roman Button1 Caption Skaityti Button2 Caption Atlikti veiksmus Button3 Caption Uzdaryti Form1 Caption MTR-1 d) Unit1.h failas: //--------------------------------------------------------------------------- #ifndef Unit1H #define Unit1H //--------------------------------------------------------------------------- #include #include #include #include #include #include #include //--------------------Papildyta----------------------------------------------- #include #include using namespace std; const char * CDuom = "MatricaD.txt"; const char * CRez = "MatricaR.txt"; const int CMaxEilSk = 100; // Maksimalus matricos eiluciu skaicius const int CMaxStSk = 100; // Maksimalus matricos stulpeliu skaicius //---------------------------------------------------------------------------- class TForm1 : public TForm { __published: // IDE-managed Components TMemo *Memo1; TStringGrid *StringGrid1; TButton *Button1; TButton *Button2; TButton *Button3; TLabel *Label1; TLabel *Label2; TBevel *Bevel1; TOpenDialog *OpenDialog1; void __fastcall Button3Click(TObject *Sender); void __fastcall Button1Click(TObject *Sender); void __fastcall Button2Click(TObject *Sender); private: // User declarations double A[CMaxEilSk][CMaxStSk]; // Matrica int n, // Eiluciu skaicius m; //Stulpeliu skaicius double teig; // Teigiami elementai AnsiString Duom(); AnsiString Duomenys; void MatricosIvedimas(double Ai[CMaxEilSk][CMaxStSk], int & ni, int & mi, const char CDuom[]); void MatricosAtvaizdavimasStringGride(); void MatricosSpausdinimasFaile(char*pav); double TeigiamiSk (int i); double DidReiksme (int i); void MatricosPakeitimas(); public: // User declarations __fastcall TForm1(TComponent* Owner); }; //--------------------------------------------------------------------------- extern PACKAGE TForm1 *Form1; //--------------------------------------------------------------------------- #endif e) Metodu aprašai: void TForm1::MatricosIvedimas(double Ai[CMaxEilSk][CMaxStSk], int & ni, int & mi, const char CDuom[]) Funkcija skirta įvesti matrica iš tekstinio failo. Pradžia Įvedimas Skaityti n ir m i = 0, n-1 j = 0, m-1 Įvesti A[i][j] reikšmę Pabaiga void TForm1::MatricosSpausdinimasFaile(char*pav) Matrica spausdinama MatricaR.txt faile. Pradžia Spausdinimas Komentarų spausdinimas i = 0, n-1 j = 0, m-1 Spausdinimas A[i][j] reikšmę Pereiti į naują eilutę Pabaiga double TForm1::TeigiamiSk (int i) Šis metodas suranda pirma teigiama skaičių eilutėje. Pradžia TeigiamiSk (int i) j = 0, m-1 A[i][j] > 0 T N Grįžti j Grįžti -1 Pabaiga double TForm1::DidReiksme (int i) Šis metodas suranda didžiausio skaičiaus eilutėje vietą. Pradžia DidReiksme (int i) did = 0 j = 1, m-1 A[i][j] > A[i][did] T N did = j Grįžti did Pabaiga void TForm1::MatricosPakeitimas() Šis metodas sukeičia vietomis pirmą teigiamą skaičių matricos eilutėse su toje eilutėje esančiu didžiausiu skaičiumi. Pradžia MatricosPakeitimas() ` Realus d Sveikas km, kt i = 0, n-1 kt = TeigiamiSk(i) kt > -1 T N km = DidReiksme(i); d = A[i][km]; A[i][km] = A[i][kt]; A[i][kt] = d; Pabaiga 1.3 Programos tekstas: //--------------------------------------------------------------------------- #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!