Bernameyên mînak li Pascal. Programming li Pascal

Ev wisa diyar e ku, bi zimanê ku di programê de Pascal - ew bi hêsanî û tîpîk bo tu bernameçêker e, lê hûn ne dikarin bêjin ku zimanê xwe ji bo cîhana nûjen de jî pir qels e. Ev sosretî tune ku wek bingehîn û lêkolîn li dibistanê ye.

Gelek caran, dema ku nivîsandina bernameyên Pascal bikaranîna jîngehê bernameyên, wekî Turbo Pascal (Turbo Pascal).

Çima beginners divê ev zimanê hilbijêre? Hewl bide ku fêm bikin. Ji bo bi temamî ji axayê ti zimanê bernameyên, divê tu wêjeya têkildar heye. Ji ber vê yekê piraniya yên zimanan dudilî û di cih de, di serî de, û Logo. Ew e, li welatên Russian-dipeyivî pir ne, da perwerde pirtûkên li ser wî heye. Vê gavê, navdar in Pascal, Java, Basic û C. Werin em her çavan cuda. Java, bi taybetî di bernameyên torê tê bikaranîn. C - yek ji zimanên herî berfireh tê axaftin, lê belê, û ya herî zehmet (bi taybetî ji bo arşîvkirin). Ji bo ku di dawiyê de hîn dibin çawa binivîse bernameyên di wê de, herî baş ew e ku hîn bibin ku pêşî Pascal û Basic. Ew hem li dibistanê (hilbijartina mamosteyan) xwend. Sedema ku ji bo belavbûna wan di rastiya ku di van zimanan, hûn dikarin heman bernameyê weke ku di C an C ++ binivîsin, di heman demê de pêşketina xwe, ji ber ku bi hemû avakirinê de ye, pir hesane.

Ev hêjayî e ji bîr nekin ku li versions of Pascal û mêjerî têr Basic, di heman demê de dibistanên cureyên zêdetir wek Turbo Pascal 7.0 û QBasic in. Ger tu jî bibin, li gor wan, dirêj de ji bo nivîsandinê alaveke biçûk heta bi 50 xetên afirandin. Turbo Pascal bi bandortir û bi leztir e.

Programa xwe ya pêşiyê di Pascal

Hevokên mînak bi hêsanî bernameyên Pascal dikare li ser înternetê de dît, bêtir dijwartir fêm bikin ku çawa ew kar.

Ji bo fêmkirina ka çi di nava vê demê de, divê tu "problem" biçûk binivîsin. Dibêjim qey hûn dixwazin bi bernameyeke ku dê du hejmarên lê zêde bike: Q + W = E. Çi heye ku ji bo çêkirina wê pêk bê?

Di nameya E dê wek variable tevbigerin (di matematîkê - X). Pêwîst e ew ji bo peywirdarkirin a bi navê (250 tîp) pêwîst e. Ev dibe ku pêk tê:

• tîpên di alfabeya Latînî (A..Z);
• Hejmar ji 0 heta 9. Lê divê em ji bîr nekin ku navê divê bi hejmareke dest ne;
• "_" Pît.

ne ji bo hevdîtinê li title:

• tîpên Russian;
• marks xalbendî;
• nerast. characters, wek lattice "#" de, rêjeya "%" dolaran "$", li tilde "~" û yên din.

An nimûne yên bi navê lê agadar dikare bibe «red_velvet4», «exo» an «shi_nee». Yek jî, divê ji bîr nekin ku Pascal doza tîpên tîpan e, da ku guherbarên bi navên «btob» û «BtoB» wek yek dermankirin. Ev di bernameyên jîngehê "Plant" e û di hucreyê de tê gotin, ku ew li jêr zelal be. Piştî vê pêvajoyê de ji bo destnîşankirina type of the variable pêwîst e. Ev pêwîst e ji bo ku kardike bernameya encama li ser ekranê nîşan dide an print ew li ser kaxiz. Ji bo nimûne, eger du hejmarên added bi, type hejmar dîyarkirin, û dema ku silavê bi telefonê, piştre - a string. type minasib Integer ( "hejmara") ji bo ji bilî asayî yên du hejmarên.

Bi type of guherbarên zelal, di heman demê de divê bê ji bo hemû guherbarên hejmar rêdan, ji bo ku ji wan re manîpulekirina azad.

Li ser bingeha tiştên ku li jor hatiye nivîsandin, hûn dikarin bi hêsanî binivîse a "puzzle." Biçûk bernameyên Pascal wê mîna vê binêrin:

shi_nee Program;

Var Q, W, E: hijmar e;

BEGIN

E: = Q + W;

END.

Xeta yekem, ango bi shi_nee bernameya - .. The name an title of the program. Ev component optional nade computation nivîskî bandorê ne. Ew, eger bikaranîn, divê îlle yekemîn de be, an jîngehê bernameyên wê çewtî diafirînin.

Description ji fakter in xeta duyem a bi saya operator ya ji bo «var». Divê hûn hemû guherbarên ku xuya ye ku lê zêde bike bernameyeke type (hijmar) û bi riya colon lîsteya.

operatorên Couple «BEGIN» - «END» dest pê dike û ji ber vê yekê bi encamdana bernameya. Ew herî girîng in; di navbera wan hemû çalakiyên ku şirove ji aliyê bernameçêker in.

syntax

Ev girîng e, ji bîr dike, ku her yek xeta code dawî bi semicolon. Ji bilî vê qeydeyî wê emrên wek var, dest pê bike, const, û yên din xizmetê. Piştî ku di dawiya dawî ya operator divê xalên danîn. Di hin rewşan de, dema ku bernameyeke tîne attachments piralî û bixemilînî operator «BEGIN» - «END», xaleke dikare piştî ku fermana bi semicolon danîn.

Ji bo ku bê peywirdarkirin di hucreyê de nirxê xwe, ji bo nimûne, E = 15, pêwist e ku bi îmzekirina heman bi a colon:

Pirs: = 15:

W: = 20;

E: = Q + W;

The colon di vê zimanê tê gotin tayînkirin. Di bernameyê de li Pascal nivîsîn e pir hêsan e, eger tu ji axayê qaîdeyên syntax li jor behsa wan.

testkirina

Running Turbo Pascal, to print di programê de kardike, bi bicihkirina marks pêwîst û danîna da xwestin ji rêzikan. Xebitandina bernameya dikare ji rêya lidarxistin menu çarçoveyê de an bi bikaranîna bişkojkên Ctrl + F9. Heke hemû carekî din, li ser ekranên hinekî wê pençên. Di bûyerê de ku çewtiyeke amade ye, ku bernameya kar hanî dê û nîşanker dê ji xeta ku ew License de derbasdar e set. Di heman demê de, li ser xeta "encam" a description of the most çewtiyên, ji bo nimûne, error 85: «;» expexted. Ev xeta nîşan dide ku li cihekî e tu semicolon hene. Lê belê, ew e hûn bala xwe bidin van pirsgirêkan e hêjayî wê ne, divê hûn ji bo fêm kirina avaniya, bikaranîna wergerandî di bernameyên Pascal.

Ku divê di rêza yekem de xwendiye?

Ji bo dest pê bi temamî ji hev fam bikin line of the program. Piştre bal kişand syntax bi paşve operatorên taybet di bîra, piştî ku mark xalbendî de dikeve ne, hîn zincîra mantiqî ya dest pê dike û di dawiya bidin,. Bînin bîra xwe ka çawa guherbarên bi rabû, ku type, pêdiviya wan û çima em ew divê. Wê fêm bikin jî ne be nerast di birêveçûna piraniya derdorên bernameyên. Tu dikarî beledîya an "kirîn" li Turbo Pascal xwe bi kar tînin. Pêwîst e timî ji bo praktîzekirina, amade ne ku disassemble "pirsgirêka" of the Internet û hêdî hêdî bi qebulkirina di bernameyên Pascal nimûne serbixwe.

array liber

The array ji bo operasyona xweşkeys de bi daneya homojen, ku di vê rewşê de bi di ciyên bîra miştûmir li darxistin, û ne cuda cuda de tê bikaranîn. Ev gengaz e ku bernamenûs, rehet bi 50 an 100 guherbarên. Ev ne misaît zêdetir e ji wan re binivîsin di array.

Hêmanên ku li komek in hene hejmara wan. Di zimanan bernameyên cuda, ji aliyê Guherandinên bi hinek kesayetiyên ne pêwîst e ji bo 1. ne li vir nimûneyeke ji bernameyên li ser Pascal dibêje ku ew bi hejmara xwe bi dest e. Ev hejmara cihekê e li index of hev element navê. Wek qaîde, ev karaktera Integerek kêmtir e. Di prensîbê de, van hucreyan ne xema çi bi endeks ê bê sazkirin: hejmar an alfabêya.

Array Pascal (mînakên li jêr) dibe ku tenê yek type ji bo ku girêdayî û hemû hêmanên wê heye. tune ye ku, yek hucreyê de dike, û hijmar din hene.

Li derdora bernameyî, yek-alî Daneyên array (i.e., simple) bi linearly ketin:

Var a: array [5..40] ji char;

b: rast;

i: hijmar e;

BEGIN

Ji bo i: = 5 ji 40 naxwînin (ch [i]);

Ji bo i: = 5 ji 40 binivîse (ch [i]: 3);

readln;

END.

Analîzkirina nimûne ji bernameyên li ser Pascal, hûn dikarin bibînin ku bîra ji bo a array sade veqetandin, ku ji 35 tîpan. Indexing ([5..40]) - ji 5 heta 40. Di xeta yekemîn de piştî fermana destpêkirin, user divê bi misogerî tu 35 tîpan (hejmar, nameyên), ku bernameya ku di yek hucreyê de tê qeydkirin da binvêse. Xeta duyemîn berpirsiyar bo berpêşkirin ji wan re li ser ekranê ye.

array du-alî

Eger array yek-alî - yek in ku hemû operasyonên ava bi "di-line", ango hemû hêmanên û çalakiyên bi keramet yek li pey ya din jî, ew e ku her du alî rê dide bo strukturên tevlihevtir bi çiqê ...

Wiha daneyên Pascal (mînakên li jêr tê dîtin) bi du awayan tê ziman: «array [10..b, 10..f] ji type" an jî «array [10..b] ji array [10..f] ji type ".

B û f - constants. Lê belê ew dikare bê zêdekirin û kesayetiyên (weke ku di array yek-alî), lê di van pirsgirêkan e ya herî baş pratîkê de ne. Ev e ji ber wê yekê ku zimanê bernameyî a yekem wek Hejmara rêzikan, û ya duyem terîf dike - bi stûnên array.

An example ya pirsgirêka bi riya a type beşa taybet:

b Const = 24; f = 13;

Type kiraz = array [10..b, 10..f] ya rast;

Var n: kiraz;

Beþ bi rêya array ji fakter ji bo danasîna a little bit hêsantir (ji bo arşîvkirin):

b Const = 24; f = 13;

Var n: array [10..b, 10..f] ya rast;

Herdu options rast in, di bernameya kar ji aliyê rêbazê de qeyda hilbijartin nayê guhertin nayê.

array vekirî

Open array - yê ku ne sînor ne. Ev heye type (rast, hijmar et al.). Bi gotineke din, ji array afirandin - dimensionless. "Ductility" wî ji aliyê bernameya li time run danasîn. Ev wiha hatiye nivîsîn:

Seulgi1: array ji char;

Yeri: array ya rast;

A feature cuda yên van array e ku di pêrista dest bi sifir, ne yek.

Graphics li Pascal

Yên ku li cem me nînin idea ji pergala xebitandinê "navxweyî" dizane ku hemû wêneyên bi riya raster lakêşeyî avakirin. images Raster bi pixel, ku wisa biçûk ku çavê mirovan kesanên a xêzkirin an jî wêneyên ji bo ku yekîneyeke yek in pêk tê. The çareseriya wêneyê mezintir biçûk pixels in.

Metoda duyemîn de ji graphics pêşkêşiyê - vector. Wek qaîde, alî û ew, derdorên, ellipses û yên din bi şêweyên geometrîk ku tevahiya picture make up.

Li derdora bernameyî, di tu zimanê gengaz û derketina holê ya vê cûre pirs, wek graphics, encama ku dê plana. Pascal, wergerandî yên van bernameyên nîşan ta astekê ji hişkiya ji bo pêşketina xwe, jî gengaz e ku mirov ava bike pictures û qalibên. Ji bo ku "çalak bikî û" pirtûkxaneya hûn bixwazin, hûn divê bi cîh a row «tîne graph;».

Bi gelemperî, di description of the data graphics, ev rêbaz tê bikaranîn:

InitGraph (driver var, difetisînin: rast; Path: string);

Li vir driver a variable ku MIME-hijmar e e; difetisînin - variable, type rastî; rêya destûrê dide te ku çalakkirin û ajokarên.