Laboratoriniai darbai

Dvimatis masyvas. „B” lygmuo

9.6   (3 atsiliepimai)
Dvimatis masyvas. „B” lygmuo 1 puslapis
Dvimatis masyvas. „B” lygmuo 2 puslapis
Dvimatis masyvas. „B” lygmuo 3 puslapis
Dvimatis masyvas. „B” lygmuo 4 puslapis
Dvimatis masyvas. „B” lygmuo 5 puslapis
Dvimatis masyvas. „B” lygmuo 6 puslapis
Dvimatis masyvas. „B” lygmuo 7 puslapis
Dvimatis masyvas. „B” lygmuo 8 puslapis
Dvimatis masyvas. „B” lygmuo 9 puslapis
Dvimatis masyvas. „B” lygmuo 10 puslapis
www.nemoku.lt
www.nemoku.lt
Aukščiau pateiktos peržiūros nuotraukos yra sumažintos kokybės. Norėdami matyti visą darbą, spustelkite peržiūrėti darbą.
Ištrauka

2. L5. Dvimatis masyvas „B” lygmuo 2.1.Užduotis. L5 – 30 užduotis : Duota D(n, m). Matrica D(n, m) užpildyta tik 0 ir 1. Suskaičiuokite, kokių elementų matricoje yra daugiau, 0 ar 1. Nustatykite, ar yra stulpelis, kuris neturi 1. Atspausdinkite jo numerį. Tuos pačius veiksmus atlikite su matrica Y(k, p) 2.2.Programos aprašymas. Formos paveikslas : Taip atrodys formos paveikslas, atlikus skaičiavimus. Klasės tipas – failas Unit1.h //--------------------------------------------------------------------------- #ifndef Unit1H #define Unit1H //--------------------------------------------------------------------------- #include #include #include #include //--------------------------------------------------------------------------- const char CMasD[] = "MasD.txt"; // Masyvo A duomenu failo vardas const char CMasY[] = "MasY.txt"; // Masyvo B duomenu failo vardas const char CRez[] = "Rez.txt"; // Rezultatu failo vardas const int CMax = 100; // Masyvo maksimalus reiksmiu skaicius //--------------------------------------------------------------------------- class TForm1 : public TForm { __published: // IDE-managed Components TMemo *Memo1; // Langas rezultatu failui isvesti TButton *Button1; // Mygtukas veiksmams atlikti TButton *Button2; // Mygtukas programos baigimui void __fastcall FormActivate(TObject *Sender); void __fastcall Button1Click(TObject *Sender); void __fastcall Button2Click(TObject *Sender); private: // User declarations int D[CMax][CMax], // D masyvas Y[CMax][CMax]; // Y masyvas int n, // D masyvo eiluciu kiekis m, // D masyvo stulpeliu kiekis k, // Y masyvo eiluciu kiekis p; // Y masyvo stulpeliu kiekis int daugiau1, // Kiek matricoje 1 daugiau0; // Kiek matricoje 0 int StNr; // Stulpelio numeris kuriame nera 1 // Nuskaito masyvo reiksmes is duomenu failo void Ivesti(int A[CMax][CMax], int &n, int &m, const char mas[]); // Iraso masyvo reiksmes i rezultatu faila lenteles pavidalu void IrasytiLentele(int A[CMax][CMax], int n, int m, const char kom[]); // Randa kuriu elementu matricoje daugiau, 0 ar 1 void KoDaugiau(int A[CMax][CMax], int n, int m, int &daugiau1, int &daugiau0); // Iraso i rezultatu faila ko matricoje daugiau, 0 ar 1 void IrasytKoDaugiau(int daugiau1, int daugiau0); // Randa stulpeli kuris neturi 1 void Stulpelis(int A[CMax][CMax], int n, int m, int &StNr); // Iraso stulpelio numeri, kuriame nera 1, i rezultatu faila void IrasytiStNr(int StNr); public: // User declarations __fastcall TForm1(TComponent* Owner); }; //--------------------------------------------------------------------------- extern PACKAGE TForm1 *Form1; //--------------------------------------------------------------------------- #endif Klasės komponentų įvykių metodų aprašas: void __fastcall FormActivate(TObject *Sender); Išvalo rezultatų failą. void __fastcall TForm1::Button1Click(TObject *Sender); Kviečia metodus: Ivesti(int A[CMax][CMax], int &n, int &m, const char mas[]);,IrasytiLentele(int A[CMax][CMax], int n, int m, const char kom[]);,KoDaugiau(int A[CMax][CMax], int n, int m, int &daugiau1, int &daugiau0);, IrasytKoDaugiau(int daugiau1, int daugiau0);, Stulpelis(int A[CMax][CMax], int n, int m, int &StNr);, IrasytiStNr(int StNr);. void __fastcall Button2Click(TObject *Sender); Kviečia metodą Close();, kuris užbaigia programos darbą (uždaro formą). Klasės programuotojo metodų aprašas: void Ivesti(int A[CMax][CMax], int &n, int &m, const char mas[]) Metodas skirtas duomenų nuskaitymui iš duomenų failų MasD.txt (D masyvo) ir MasY.txt (Y masyvo). Kadangi skaitymas vyksta iš skirtingų failų, šis metodas naudoja parametrus, kurie nurodo masyvą, eilučių bei stulpelių kiekį ir failo vardą. Pradžia Ivesti(); Atidaryti failą skaitymui Skaityti n, m i=0; n-1 j=0; m-1 Skaityti A[i][j] reikšmę Uždaryti failą Pabaiga Ivesti(); void IrasytiLentele(int A[CMax][CMax], int n, int m, const char kom[]) Surašo į rezultatų failą masyvų elementus lentelės pavidalu. Kadangi reikia surašyti du atskirus masyvus, naudoja parametrus ( A – masyvas , n – eilučių skaičius, m – stulpelių skaičius, mas – komentaras); Pradzia IrasytiLentele(); Failas CRez Atidaryti failą papildomam rašymui Atspausdinti kom i = 0; m-1 (Stuleliu numeracija) Spausdinti i i = 0;m-1 (Breziamas bruksnys) Spausdinti „-----“ i=0; n-1 (Spausdinami masyvo elementai) Spausdinti i ir „ |“ j=0; m-1 Spausdinti A[i][j] reikšmę Spausdinti „ |“ I=0; m-1 (Breziamas bruksnys) Spausdinti „-----“ Uždaryti failą Pabaiga IrasytiLentele(); void KoDaugiau(int A[CMax][CMax], int n, int m, int &daugiau1, int &daugiau0) Metodas randa kuriu elementu matricoje daugiau, 1 ar 0. Pradžia KoDaugiau(); daugiau1 = 0; daugiau0 = 0; i=0; n-1 j=0; m-1 Taip A[i][j] == 1 Ne daugiau1++ daugiau0++ Pabaiga KoDaugiau(); void IrasytKoDaugiau(int daugiau1, int daugiau0) Metodas iraso i rezultatu faila kuriu elementu matricoje daugiau, 1 ar 0. Pradžia IrasytiKoDaugiau(); Failas CRez Atidaryti failą papildomam rašymui Taip daugiau1 > daugiau0 Ne Spausdinti "Matricoje daugiau: 1 " Spausdinti "Matricoje daugiau: 0 Uždaryti failą Pabaiga IrasytiKoDaugiau(); void Stulpelis(int A[CMax][CMax], int n, int m, int &StNr) Metodas randa stulpeli kuris neturi 1. Pradzia Stulpelis(); StNr = 0; suma = 0; j=0; m-1 suma = 0 i=0; n-1 suma = suma + A[i][j] Taip suma = = 0 Ne StNr = j Pabaiga Stulpelis(); void IrasytiStNr(int StNr) Metodas iraso stulpelio numeri i rezultatu faila. Pradžia IrasytiStNr(); Failas CRez Atidaryti failą papildomam rašymui Taip StNr >= 0 Ne Spausdinti „Stulpelis neturintis 1 yra: " StNr Spausdinti „Stulpelis neturintis 1 yra: Nera“ Uždaryti failą Pabaiga IrasytiStNr(); 2.3 Atmintinė vartotojui: Pradiniai duomenys yra saugomi tekstiniuose failuose, kuriu pavadinimai „MasD.txt“ ir „MasY.txt“ ( atitinkamai D masyvas ir Y masyvas ), o rezultatai surašomi į tekstinį failą „Rez.txt“. Pirmas skaičius yra eiluciu kiekis, antrasis stulpeliu kiekis. Duomenis į duomenų failą rekomenduojama suvesti su Notepad programa. Vykdant programą reikia nepamiršti, jog nėra apsaugos nuo klaidingų duomenų įvedimo, t.y. skaičiai duomenų failuose turi atitikti C++ kalbos reikalavimus. Programos tekstas – failas Unit1.cpp //--------------------------------------------------------------------------- #include

Daugiau informacijos...

Šį darbą sudaro 1554 žodžiai, tikrai rasi tai, ko ieškai!

★ 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!

Detali informacija
Darbo tipas
Lygis
Universitetinis
Failo tipas
Word failas (.doc)
Apimtis
10 psl., (1554 ž.)
Darbo duomenys
  • Programavimo laboratorinis darbas
  • 10 psl., (1554 ž.)
  • Word failas 118 KB
  • Lygis: Universitetinis
www.nemoku.lt Atsisiųsti šį laboratorinį darbą
Privalumai
Pakeitimo garantija Darbo pakeitimo garantija

Atsisiuntei rašto darbą ir neradai jame reikalingos informacijos? Pakeisime jį kitu nemokamai.

Sutaupyk 25% pirkdamas daugiau Gauk 25% nuolaidą

Pirkdamas daugiau nei vieną darbą, nuo sekančių darbų gausi 25% nuolaidą.

Greitas aptarnavimas Greitas aptarnavimas

Išsirink norimus rašto darbus ir gauk juos akimirksniu po sėkmingo apmokėjimo!

Atsiliepimai
www.nemoku.lt
Dainius Studentas
Naudojuosi nuo pirmo kurso ir visad randu tai, ko reikia. O ypač smagu, kad įdėjęs darbą gaunu bet kurį nemokamai. Geras puslapis.
www.nemoku.lt
Aurimas Studentas
Puiki svetainė, refleksija pilnai pateisino visus lūkesčius.
www.nemoku.lt
Greta Moksleivė
Pirkau rašto darbą, viskas gerai.
www.nemoku.lt
Skaistė Studentė
Užmačiau šią svetainę kursiokės kompiuteryje. :D Ką galiu pasakyti, iš kitur ir nebesisiunčiu, kai čia yra viskas ko reikia.
Palaukite! Šį darbą galite atsisiųsti visiškai NEMOKAMAI! Įkelkite bet kokį savo turimą mokslo darbą ir už kiekvieną įkeltą darbą būsite apdovanoti - gausite dovanų kodus, skirtus nemokamai parsisiųsti jums reikalingus rašto darbus.
Vilkti dokumentus čia:

.doc, .docx, .pdf, .ppt, .pptx, .odt