Raha manome fitoerana ho an'ny rindrambaiko no ilaina

Novice rindrambaiko Mety tsy ho mahazatra mbola ilaina raha manome fitoerana iray. Izany no iray mahazatra Pascal tsingerin'ny niasa tamin'ny mpanelanelana. Izany no olana isan-karazany ilaina ao, ka hijery ny fomba manao fandaharam- izany tsingerina.

Tsingerin'ny Raha Pascal mitaky atao toy izao manaraka izao:

• Raha (toe-) no (manomboka raha ilaina).
• asa algorithm.
• Ny (rehefa manomboka ny ekipa fisian'ny).

Ny andalana voalohany - "Cap" baiko. Ny toe-javatra dia mety ho zava-dehibe isa mametra fanazavana hiovaova amin'ny Integer (d <100), ny karazana miova boolean (t = Marina) na ny kofehy (Tex = 'Manahoana'). "Manomboka ny" baiko Nampiditra, raha ilaina ny manome fitoerana hanao fepetra mihoatra ny iray. Ny manaraka izao dia mamaritra ny zavatra izay tsy maintsy hanatanteraka ny fandaharam-potoana eo ambanin'ny toe-javatra izay ny Raha manome fitoerana no novonoina ho faty. Mety misy didy isan-karazany, fomba, asa, tsingerina toy izany. Amin'ny farany dia ilaina ny mametraka ny didy "farany", raha tsy, mazava ho azy, ny andalana voalohany dia "manomboka".

Diniho ny ohatra fandaharana izay mamaritra misy didy. , Ohatra, dia mila mahita isa ny voalohany N integers tsara. Araka izany, amin'ny voalohany heverintsika N (na dia foana lehibe noho aotra). Dia manomboka ny tsingerin. Zava-dehibe ny mahatakatra fa tsy maintsy miasa izy, raha tsy mahatratra ny hasarobidin'ny n. Ireto misy safidy mihoatra ny iray ho an'ny famahana ny olana, fa aoka ihany hisy hifantoka amin'ny zava-misy izay vokany eo ny fampiasana ny latabatra izay tianao ny hametraka. Ny toerana misy anao, dia nanao izany mampiasa ny miova i. Alohan'ny manomboka miaraka dia ilaina ny hanome azy io ho zava-dehibe ny "1". Ny mifanohitra manompo toy ny teny amin'ny vaovao rehetra arahana asa. Miorina eo amin'ny asa fitoriana, tsy maintsy hanampy foana ny iray amin'izany. Noho izany, rehefa misy manohitra mitovy isa fanondroana ny hasarobidin'ny ny isa n. Izany no ho famantarana ho vita ilay asa fandaharana. Mba kajy ny vola isika, hampidirana ny miova l. Isaky ny famerimberenana izany dia voatendry ny vidiny teo aloha miampy ny isan'ny i. Taorian'ny faran'ny Ny fisiana ara-, tsoahana K fanazavana ihany hiovaova eo amin'ny efijery. Izany no fanazavana fohy momba ny tenin 'ny fandaharana. Ankehitriny dia mijery ny fehezan-dalàna.

Readln (n); '- dia hitantsika ny isa n.

I: = 1; K: = 0; '- miditra ao amin'ny asa latabatra, dia aotra ny hasarobidin'ny isa.

Raha mbola <= N no hanomboka '- notendreny ny fepetra ny asa tsingerin'ny.

K: = K + aho; I: = aho, + 1; '- manampy sanda ny vola fanavaozana latabatra.

farany; '- Raha vita ny famaritana ny asa.

Writeln (k); - Ireo fanatsoahan-kevitra.

Isika hijery ohatra iray hafa. Ankehitriny dia mila mameno ny mpampiasa miaraka amin'ny fitendry N anarana izay hamonjy ny andinin-teny voaomana. Ny foto-kevitra eto dia mitovy amin'ny taloha. Ampidiro ny isan'ny N, isika hampavitrika ny toe napetraka Raha manome fitoerana. Ankoatra izany, dia maneho ny fitendry torohevitra ho ny fahatsiarovana fihaingoana sela. Mametraha MediaWiki mamarana asa miverimberina. Avy eo, ny latabatra dia Reset sy miseho fihaingoana. Na izany aza, reset ny latabatra ao anatin'ity lohahevitra ity dia midika hoe manendry ny zava-dehibe iray, satria dia tsy afaka ny hitondra aotra sela voaomana (tsy misy). Fehezan-dalàna ny fandaharana dia toy izao manaraka izao: amin'ny fandaharana ity dia handray ny isan'ny voajanahary maro isa tsara, izay mifarana ny fampidirana ny tena n. Tokony ho fantatra mazava fa eo ny tsy fisian'ny ny latabatra, Pascal tsingerin'ny Raha tsy vita. Raha manadino tampoka momba izany, eo amin'ny fanatanterahana ny fandaharana fehezan-dalàna, ny solosaina manomboka nahantona. Efa tsaboina ny bokotra "Pause Break". Amin'ny maha-manohitra ny fampiasana fanazavana samihafa hiovaova ao amin'ny c.

Readln (n);

C: = 1;

Raha amin 'ny <= N no hanomboka' - fototra ny toe-piainana.

Readln (a [d]); C: = d + 1; '- mamaky rakitra avy amin'ny keyboard, dia hanampy sarobidy ny latabatra.

farany; '- vita ny tsingerin.

C: = 1; '- schetiku hiverina vidiny tany am-boalohany.

Raha amin 'ny <= N hanao soraty (a [d]); '- Asehoy anarana n.

Avy eo azonao teo amin'ny efijery N ny anarana izay efa niditra avy amin'ny fitendry. Tamin'izay, ny fotoana kelikely mifarana manome fitoerana. Izany no nampiasain'ny samy beginners sady nandroso mpampiasa. Tsy isaina, ary noho izany dia mitaky manokana tsara ny rindrambaiko sy ny fanampiny miova.