Duk da yake madauki da amfani ga shirye-shirye

Novice shirye-shirye na iya ba tukuna zama saba daya amfani yayin da madauki. Wannan shi ne wani hali sake zagayowar aiki a Pascal matsakaici. Wannan na da amfani a daban-daban matsaloli, haka dubi yadda za ka iya yin wani shirin na wannan sake zagayowar.

Da'ira Duk da yake Pascal bukatar sanya kamar haka:

• Duk da yake (yanayin) kada (fara idan ya cancanta).
• mataki algorithm.
• Karshen (a lokacin da tawagar fara kasancewa).

A farko line - "hula" umurninSa. A yanayin iya zama na lamba darajar iyakance Bayani canji a lamba (d <100), da m irin Boolean (t = True) ko kirtani (tex = 'hello'). "Fara" umurnin sa, idan da madauki wajibi ne a yi fiye da daya yanayin. A wadannan ya bayyana ayyuka da cewa shirin dole yi a karkashin yanayin da cewa Duk da yake madauki da aka kashe. Yana iya ƙunsar wani iri-iri na dokokin, hanyoyin, ayyuka, irin hawan keke. A karshen shi wajibi ne don sa da umurnin "karshen", sai dai in, ba shakka, na farko line ya "za a fara".

Yanzu la'akari da misali shirye-shirye dake dauke da bayyana umurnai. Alal misali, muna bukatar mu sami Naira Miliyan Xari da farko n m integers. Don wannan karshen, da farko mun yi la'akari n (ko da yake shi zai zama ko da yaushe mafi girma daga sifili). Sa'an nan kuma fara da sake zagayowar. Yana da muhimmanci a fahimci cewa yana da aiki, har sai da ta kai darajar n. Ga akwai fiye da daya zaɓi don magance matsalar, amma za mu mayar da hankali ne a kan gaskiyar cewa rinjayar da yin amfani da kanta cewa kana so ka shigar. By tsoho, wannan da aka yi ta amfani da m i. Kafin ka fara da shi wajibi ne don sanya shi a darajar "1". A counter hidima a matsayin kalma da kowane sabon cyclical ayyuka. Bisa mu manufa, kullum suna don ƙara daya zuwa gare shi. Saboda haka, a lokacin da na lamba index counter daidai da darajar da lambar n. Wannan zai zama alama a gare kammala aikin shirin. Don lissafi da adadin da muka gabatar da m k. Tare da kowane maimaitawa shi za a sanya baya darajar da lambar i. Bayan karshen kirgawa, kawai kacokan k Bayani canji a allon. Wannan shi ne taƙaitaccen bayani a kan kalmomi na shirin. Yanzu muka dubi code.

Readln (n). '- mun karanta yawan n.

i: = 1; k: = 0. '- shigar a cikin aikin counter, mu kome daga cikin tamanin da Miliyan Xari.

Duk da yake i <= n kada a fara '- saita a kan yanayin da aikin sake zagayowar.

k: = k + i. i: = i + 1. '- ƙara darajar da adadin karshe counter.

ƙare. '- Duk da yake kammala bayanin irin aiki.

Writeln (k). - Wadannan karshe.

Mu duba a wani misali. Yanzu muna bukatar mu ba da damar mai amfani don cika keyboard n sunayen cewa zai ajiye rubutu tsararru. The manufa a nan shi ne kama da baya. Shigar da lambar n, mun kunna Duk da yake madauki sa yanayin. Bugu da ari, nuna a fakaice da keyboard shigar da memory cell tsararru. Saita counter kammala maimaita aiki. Next, counter ne sake saiti da kuma nuni tsararru. Duk da haka, sake saita kanta a cikin wannan mahallin yana nufin sanya wani darajar daya, tun da ka ba zai iya kawo sifili cell tsararru (shi ba ya wanzu). A shirin code shi ne kamar haka: a cikin wannan shirin za ka samu Naira Miliyan Xari da wani yawan halitta m lambobi, wanda ƙare gabatarwar mafi n. Ya kamata a fahimci cewa a cikin rashi na counter, Duk Pascal sake zagayowar taba kammala. Idan ka ba zato ba tsammani manta game da shi, a cikin kisan shirin code, da kwamfuta farawa rataya. Yana da aka bi da button "Dakata Hutu". Kamar yadda wani counter ga yin amfani da bambancin Bayani canji a c.

Readln (n).

c: = 1;

Duk da yake c <= n kada a fara '- shuka yanayi.

Readln (a [c]). c: = c + 1. '- karanta data daga keyboard, mu ƙara darajar zuwa counter.

ƙare. '- kammala sake zagayowar.

c: = 1; '- schetiku koma asali darajar.

Duk da yake c <= n yi write (a [c]). '- Display sunan n.

Sa'an nan kuma ka samu a kan allo n sunayen da aka shigar daga keyboard. A cewa, a Duk da yake madauki ƙare. Ana amfani da duka sabon shiga da kuma ci-gaba masu amfani. Ya ba ya ƙidaya, saboda haka na bukatar kulawa ta musamman wajen shirye-shiryen da kuma wani ƙarin m.