Pascal - programavimo kalba

Programavimas bei interneto svetainių kūrimas
mrmodern
Princesė
Posts: 4042
Joined: Wed Mar 28, 2007 8:27 pm
Location: Vilnius

Pascal - programavimo kalba

Postby mrmodern » Sun Nov 11, 2007 11:46 am

Apie pascal - programavimo kalbą
Programavimo kalba Pascal (Paskalis) – kalba, daugiausiai naudojama švietimo įstaigose programavimo kalbų pagrindų mokymui.

Kalbą sukūrė Niklausas Virtas (Niklaus Wirth) 1970 metais kaip priemonę, skatinančią studentus programuoti struktūriškai. Kalba sukurta Algol kalbos pagrindu ir pavadinta matematiko bei filosofo Blezo Paskalio (Blaise Pascal) garbei.

Pagrindinės taisyklės:

* kiekviena programa prasideda program baziniu žodžiu (nebūtinai) ir baigiasi tašku (.)
* sakinių blokai apgaubiami baziniais žodžiais begin ir end
* didžiosios ir mažosios raidės Paskalyje neskiriamos, taigi 'Program', 'PROGRAM' ar 'program' reiškia tą patį.
* sakiniai skiriami kabliataškiais (;)
* visi kintamieji turi būti iš anksto apibrėžti nurodant tipą.


Paprasčiausių Paskalio kalba parašytų programų pavyzdžiai:

program Labas_pasauli(output);
begin
WriteLn('Labas, Pasauli!')
end.

program Sudėtis;
var a, b, c : integer;
begin
WriteLn('Įveskite pirmą dėmenį');
ReadLn (a);
WriteLn('Įveskite antrą dėmenį');
ReadLn (b);
c := a + b;
WriteLn('Skaičių ', a, ' ir ', b, ' suma yra lygi ', c);
ReadLn;
end.

Kompiliatoriai

* FreePascal
* Turbo Pascal
* GNU Pascal kompiliatorius
* Delphi

Istorinės žinios

Kuriant Pascal, buvo remtasi naujausiomis (struktūrinio) programavimo idėjomis, bandant jas apibendrinti, tad Pascal tapo ne tik mokomąja, bet ir konceptualia kalba, padariusia labai stiprią įtaką daugumai vėliau sukurtų kalbų, pvz., C. Bandant patobulinti Pascal, buvo sukurtos tokios kalbos, kaip Ada, Modula-2 ir Oberon. Pascal padarė beveik nesulyginamą įtaką kompiliatorių kūrėjams: Pascal sintaksė buvo kuriama taip, kad būtų galima kompiliuoti vienu praėjimu (kintamųjų, procedūrų, etc. deklaravimas), todėl atsirado galimybė vykdyti atitikimo tarp programų tekstų ir generuoto kodo analizę. Analizuojant Pascal kompiliavimo metodus, buvo sukurtas USCD Pascal kompiliatorius bei virtuali mašina, skirta Pascal pseudokodo vykdymui, davusi pradžią vėliau kurtoms virtualioms mašinoms, ypač – Java.
Iš ko mokytis:
Vadovėliai

* Grigas G. Programavimo pagrindai. – Kaunas: Šviesa, 1987.
* Dagienė V. Mokomės programuoti. – Kaunas: Šviesa, 1989.
* Dagienė V., Grigas G. Informatika / Bandomoji mokymo priemonė X–XII klasei. – Kaunas: Šviesa, 1991.
* Burgis B. ir kt. Kompiuterika / Moksleiviams ir studentams. – Kaunas: Technologija, 1993 (1994).
* Dagienė V. Informatikos pradmenys IX–X klasei: II dalis / Algoritmai. – Vilnius: TEV, 1998 (2001).
* Grigas G. Programavimas Paskaliu (visa knyga: ProgPas.zip – 213 K baitų).
* Burgis B. ir kt. Kompiuterija / Mokymosi knyga. – Kaunas: Naujasis lankas, 2000.
* Blonskis J., Dagienė V. Programavimo pradmenys XI–XII klasėms. – Vilnius: TEV, 2001 (priedas – programų tekstai: PP1112pr.zip – 136 K baitų).
* Dagienė V. Informacinės technologijos IX–X klasėms: 2 dalis / Informacija. Algoritmai. Programavimas. – Vilnius: TEV, 2003.
* Petrauskas L., Skūpienė J. Informatikos olimpiados: algoritmai ir taikymo pavyzdžiai. – Vilnius: 2006.

Žinynai

* Dagienė V. ir kt. Paskalio programavimo kalba. – Vilnius: Mokslas, 1983.
* Tumasonis V. ir kt. Paskalis: Programuotojo vadovas. – Vilnius: Mokslas, 1990.
* Tumasonis V. Paskalis ir Turbo Paskalis 7.0. – Vilnius: Ūkas, 1993.

Uždavinynai

* Dagienė V. ir kt. Šimtas programavimo uždavinių. – Kaunas: Šviesa, 1986.
* Dagienė V., Grigas G. Programavimo uždaviniai. – Vilnius: MKI, 1987 (1988).
* Dagienė V., Grigas G. Programavimo uždavinynas. – Kaunas: Šviesa, 1992.
* Dagienė V., Skūpienė J. Moksleivių informatikos olimpiadų uždaviniai: I–VII olimpiados. – Vilnius: TEV, 1999 (priedas – uždavinių sprendimai, testai bei rezultatai: oluzd1d.zip – 1 M baitų).
* Dagienė V., Grigas G. Programavimo pradmenų uždavinynas / XI–XII klasėms. – Vilnius: TEV, 2000.
* Dagienė V., Skūpienė J. Moksleivių informatikos olimpiadų uždaviniai: VIII–X olimpiados. – Vilnius: TEV, 2001 (priedas – uždavinių sprendimai, testai bei rezultatai: oluzd2d.zip – 1 M baitų).

Metodiniai straipsniai

* Tumasonis V. Kintamieji, vardai, reikšmės arba dar kartą apie ciklus. – Informatika, 1987, Nr. 5, 28–40.
* Dagienė V. Programos teksto komentavimas. – Informatika, 1988, Nr. 7, 53–65.
* Grigas G. Kontrolinių darbų vertinimas. – Informatika, 1988, Nr. 10, 77–83.
* Grigas G. Sveikieji ir realieji skaičiai. – Informatika, 1989, Nr. 13, 49–68.
* Klupšaitė A., Stanžienė D. Jaunųjų programuotojų mokyklos klausytojų programų klaidos ir trūkumai. – Informatika, 1989, Nr. 14, 22–40.
* Dagienė V. Algoritminis programavimo stilius dirbant Turbo Paskalio sistema. – Informatika, 1992, Nr. 21, 3–15.
* Grigas G. Kontrolinių duomenų parinkimas atsižvelgiant į funkcijos lūžio taškus. – Informatika, 1992, Nr. 22, 7–15.
* Paliulionienė L. Šalutinis funkcijų efektas. – Informatika, 1994, Nr. 24, 22–28.
* Dagienė V. Algoritmo teksto išdėstymas. – Informatika, 1995, Nr. 26, 29–47.
* Grigas G. Algoritmo rengimas spaudai. – Informatika, 1997, Nr. 30, 28–42.
* Grigas G. Uždavinio sprendimo idėjos aprašas. – Alfa plius omega, 2000, Nr. 2 (10), 77–79.
* Skūpienė J. Programų vykdymo klaidos. – Informatika, 2000, Nr. 1 (35), 113–120.
* Laucius R. Free Pascal ir Borland Pascal kalbų suderinamumas. – Informatika, 2001, Nr. 2 (38), 92–96.

Parsisintimai:

http://ims.mii.lt/fps/download/0.6.4/fp ... .4a_lt.exe - Lietuviškas FPS kompiliatorius
ftp://aldona.mii.lt/pub/MII/PMS/olimp/oluzd1d.zip- Moksleivių informatikos olimpiadų uždaviniai: I–VII olimpiados uždavinių sprendimai, testai bei rezultatai.
ftp://aldona.mii.lt/pub/MII/PMS/olimp/oluzd2d.zip - Moksleivių informatikos olimpiadų uždaviniai: VIII–X olimpiados uždavinių sprendimai, testai bei rezultatai.
ftp://aldona.mii.lt/pub/MII/PMS/mokykla ... 1112pr.zip - Blonskis J., Dagienė V. Programavimo pradmenys XI–XII klasėms. – Vilnius: TEV, 2001 (priedas – programų tekstai:
ftp://aldona.ktl.mii.lt/pub/MII/PMS/knygos/ProgPas.zip - Grigas G. Programavimas Paskaliu

Kitos nuorodos:

http://en.wikipedia.org/wiki/Pascal_%28 ... anguage%29
Straipsnis rusų kalba apie pascalio kalbą
http://ims.mii.lt/ims/
http://ims.mii.lt/jpm/content/Apie_JPM/1
http://www.nmakademija.lt
Last edited by mrmodern on Sat Feb 02, 2008 9:43 pm, edited 4 times in total.
AMD Phenom 9750 HD3850, 4gb 2x2048mb ddr2, 320GB, 790X chipset.

Gknight
Posts: 652
Joined: Mon Jul 17, 2006 5:41 pm
Location: Anykščiai

Re: Pascal - programavimo kalba

Postby Gknight » Sun Nov 11, 2007 12:07 pm

Sutrumpinkit šitą nuorodą: http://ru.wikipedia.org/wiki<...> :evil:
Ir, man atrodo, ne "mokintis", o "mokytis".
Image

mrmodern
Princesė
Posts: 4042
Joined: Wed Mar 28, 2007 8:27 pm
Location: Vilnius

Re: Pascal - programavimo kalba

Postby mrmodern » Tue Nov 13, 2007 9:00 pm

Pirmas klausimas: kaip su pascal`iu atspausdinti ką nors? bandžiau su PRN bet neveikia. Man reiktų atspausdinti tekstą.
AMD Phenom 9750 HD3850, 4gb 2x2048mb ddr2, 320GB, 790X chipset.

User avatar
Progmaker
Rašytojas
Posts: 2414
Joined: Thu Jul 06, 2006 10:11 am
Contact:

Re: Pascal - programavimo kalba

Postby Progmaker » Tue Nov 13, 2007 10:38 pm

Popieriuje ar ekrane?
Knowledge is power! && http://www.ernestas.info/ (Gyvenu čia)

mrmodern
Princesė
Posts: 4042
Joined: Wed Mar 28, 2007 8:27 pm
Location: Vilnius

Re: Pascal - programavimo kalba

Postby mrmodern » Wed Nov 14, 2007 5:23 pm

Popieriuj. :D :D :D
AMD Phenom 9750 HD3850, 4gb 2x2048mb ddr2, 320GB, 790X chipset.


User avatar
nqrg
Rašytojas
Posts: 3804
Joined: Tue Jun 05, 2007 2:49 pm

Re: Pascal - programavimo kalba

Postby nqrg » Wed Nov 21, 2007 8:35 pm

http://www.pprc.lt/profilinis/kaita/blonknyga/tema2.htm čia daug apie pascalį paaiškinta . Beto yra išprestų keleta standartinių uždavinių pvz. algortimas ax2+bx+c=0



EDIT : http://62.80.232.136/informatika/pas10kl/
T2060 1,6 Ghz ram 2028mb hhd 120 gb + 500gb vaizdas Mobile Intel(R) 945 Express Chipset Family 224mb Hewlett Packard P.S. Super PI - 44s [1M]

User avatar
nqrg
Rašytojas
Posts: 3804
Joined: Tue Jun 05, 2007 2:49 pm

Re: Pascal - programavimo kalba

Postby nqrg » Sat Dec 01, 2007 9:50 pm

Reikėtų šią tema kelti aukščiau . Moderatoriai galėtų ją padaryti D.U.K ;)
T2060 1,6 Ghz ram 2028mb hhd 120 gb + 500gb vaizdas Mobile Intel(R) 945 Express Chipset Family 224mb Hewlett Packard P.S. Super PI - 44s [1M]

User avatar
Progmaker
Rašytojas
Posts: 2414
Joined: Thu Jul 06, 2006 10:11 am
Contact:

Re: Pascal - programavimo kalba

Postby Progmaker » Sun Dec 02, 2007 4:26 pm

Padaryti tai galėtume, bet tokio atributo rasti nepavyko man :D
Knowledge is power! && http://www.ernestas.info/ (Gyvenu čia)

mrmodern
Princesė
Posts: 4042
Joined: Wed Mar 28, 2007 8:27 pm
Location: Vilnius

Re: Pascal - programavimo kalba

Postby mrmodern » Sun Dec 02, 2007 5:23 pm

Sticky padaryk.
AMD Phenom 9750 HD3850, 4gb 2x2048mb ddr2, 320GB, 790X chipset.

User avatar
Progmaker
Rašytojas
Posts: 2414
Joined: Thu Jul 06, 2006 10:11 am
Contact:

Re: Pascal - programavimo kalba

Postby Progmaker » Mon Dec 03, 2007 10:16 pm

Žinau. Nėra tokio punkto :D
Knowledge is power! && http://www.ernestas.info/ (Gyvenu čia)

mrmodern
Princesė
Posts: 4042
Joined: Wed Mar 28, 2007 8:27 pm
Location: Vilnius

Re: Pascal - programavimo kalba

Postby mrmodern » Tue Dec 04, 2007 4:14 pm

Vadovėliai

* Grigas G. Programavimo pagrindai. – Kaunas: Šviesa, 1987.
* Dagienė V. Mokomės programuoti. – Kaunas: Šviesa, 1989.
* Dagienė V., Grigas G. Informatika / Bandomoji mokymo priemonė X–XII klasei. – Kaunas: Šviesa, 1991.
* Burgis B. ir kt. Kompiuterika / Moksleiviams ir studentams. – Kaunas: Technologija, 1993 (1994).
* Dagienė V. Informatikos pradmenys IX–X klasei: II dalis / Algoritmai. – Vilnius: TEV, 1998 (2001).
* Grigas G. Programavimas Paskaliu (visa knyga: ProgPas.zip – 213 K baitų).
* Burgis B. ir kt. Kompiuterija / Mokymosi knyga. – Kaunas: Naujasis lankas, 2000.
* Blonskis J., Dagienė V. Programavimo pradmenys XI–XII klasėms. – Vilnius: TEV, 2001 (priedas – programų tekstai: PP1112pr.zip – 136 K baitų).
* Dagienė V. Informacinės technologijos IX–X klasėms: 2 dalis / Informacija. Algoritmai. Programavimas. – Vilnius: TEV, 2003.
* Petrauskas L., Skūpienė J. Informatikos olimpiados: algoritmai ir taikymo pavyzdžiai. – Vilnius: 2006.

Žinynai

* Dagienė V. ir kt. Paskalio programavimo kalba. – Vilnius: Mokslas, 1983.
* Tumasonis V. ir kt. Paskalis: Programuotojo vadovas. – Vilnius: Mokslas, 1990.
* Tumasonis V. Paskalis ir Turbo Paskalis 7.0. – Vilnius: Ūkas, 1993.

Nusipirk vieną ar kelias knygas ir išmoksi.
AMD Phenom 9750 HD3850, 4gb 2x2048mb ddr2, 320GB, 790X chipset.

mrmodern
Princesė
Posts: 4042
Joined: Wed Mar 28, 2007 8:27 pm
Location: Vilnius

Re: Pascal - programavimo kalba

Postby mrmodern » Fri Jan 18, 2008 4:12 pm

Code: Select all

Parašykite funkciją nevienodi(sk: longint): longint, kuri iš duoto skaičiaus pašalintų visus vienodus skaitmenis. Pavyzdžiui, nevienodi(13) = 13, nevienodi(14405) = 105, nevienodi(5522) = 0, nevienodi(10021) = 2.
Galima pagalbos? Galima naudot if,case sakinius, for, while,repeat kartojima. Draudžiama naudot visokias eilutes, aibes,masyvus, keisti aprašą ir t.t
AMD Phenom 9750 HD3850, 4gb 2x2048mb ddr2, 320GB, 790X chipset.

mazge
Posts: 21
Joined: Sun Jan 20, 2008 1:38 pm

Re: Pascal - programavimo kalba

Postby mazge » Sun Jan 20, 2008 1:41 pm

Padekit man labai prasau... as katik pradejau programavima ir beveik nieko nesuprantu... man reikia sukurti programa pagal sia salyga:

Duotas dviženklis skaičius x. Parašykite algoritmą, kuris iš skaičiaus x ir jo atbulo užrašo sudarytų keturženklį skaičių k: paskutiniai du jo skaitmenys reikštų patį skaičių x, o pirmieji - atbulą (pvz., jeigu x=12, tai k=2112).

mrmodern
Princesė
Posts: 4042
Joined: Wed Mar 28, 2007 8:27 pm
Location: Vilnius

Re: Pascal - programavimo kalba

Postby mrmodern » Sun Jan 20, 2008 1:52 pm

Prašom. Dėkot nereikia :D

Code: Select all

program Bevardë42; var x,k:integer; begin Writeln('Iveskite x'); Readln(x); k:=(x mod 10 *1000)+(x div 10*100)+x; writeln(k); Readln; end.
AMD Phenom 9750 HD3850, 4gb 2x2048mb ddr2, 320GB, 790X chipset.


Return to “Programuotojų kampas”

Who is online

Users browsing this forum: No registered users and 13 guests

cron