INFO2214 2-as praktinis darbas
Kursas "Informatika" 2008/09 m.m. pavasario (2) sem.
| Variantas: | 227 |
| Atliko: | Laurynas Stašys |
| Pradėtas: | 2009.03.05 |
| Baigtas: | 2009.05.03 |
Uždavinio formulavimas
MED sintaksės apibrėžimo failo įvedimas.
Uždavinio atlikimas
Kadangi užduotis buvo sugalvoti funkcijų rinkinį, tai aš sugalvojau, kad unit'as turi parodyti, kiek yra raktinių žodžių grupių, kiek kiekvienoje grupėje yra žodžių, bet vartotojui įvedus grupės ir elemento numerį, programa pateikia raktinį žodį. Kadangi pagal nutylėjimą MED failo koduotė yra UNIX, o ne Windows, tai rašydamas kėliau prielaidą, jog MED sintaksės failai bus išsaugoti ANSI koduote.
Atlikto darbo palyginimas su ankstesniu šio darbo atlikimu
Praeitame darbe buvo naudojamas stekas, tačiau pasak pratybų dėstytojo, raktinių žodžių negali buti tiek daug, jos reikėtu jį naudoti, todėl panaudojau dvimatį masyvą. Mano darbas geresnis, nes yra daugiau funkcijų ir naudojamos paprastesnės duomenų struktūros
Funkcijos
openfile;- Procedūra iš sintaksės failo nuskaito dalį tekstinio failo, kuriame yra raktiniai žodžiai ir juos išveda į kitą tekstinį failą.
wordcount;- Procedūra iš naujai sukurto failo nuskaito visus raktinius žodžius bei suranda kiek yra raktinių žodžių grupių. Po to visus raktinius žodžius sudeda į dvimatį masyvą. Be to, procedūra tikrina ar yra bent vienas raktinis žodis, jei jų nėra, programa baigia darbą
word_group;- Funkcija apskaičiuoja, kiek yra raktinių žodžių grupių
keyword;- Procedūra išveda pasirinktos grupės pasirinktą elementą
count;- Procedūra į ekraną išveda, kiek kiekvienoje grupėje yra elementų
Darbo rezultatai
- prodcedureset.pas
- Free Pascal'io Unit'as, atitinkantis uždavinio sąlygą.
- main.pas
- Pagalbinė programa Unit falio testavimui.
- Step1.mak
- Make failas, programos paruošimui.
- Step1.bat
- Komandinis failas, programos vykdymui MS-DOS aplinkoje.
- Step1.sh
- Komandinis failas, programos vykdymui UNIX aplinkoje.