ਜਦਕਿ ਲੂਪ ਪ੍ਰੋਗਰਾਮਰ ਲਈ ਲਾਭਦਾਇਕ ਹੈ,

ਨਿਹਚਾਵਾਨ ਪ੍ਰੋਗਰਾਮਰ ਅਜੇ ਵੀ ਜਾਣੂ ਇੱਕ ਲਾਭਦਾਇਕ ਹੈ, ਜਦਕਿ ਲੂਪ ਹੋ ਨਾ ਹੋ ਸਕਦਾ ਹੈ. ਇਹ ਪਾਸਕਲ ਮਾਧਿਅਮ ਵਿੱਚ ਇੱਕ ਖਾਸ ਚੱਕਰ ਕਾਰਵਾਈ ਹੈ. ਇਹ ਵੱਖ-ਵੱਖ ਸਮੱਸਿਆ ਦੇ ਲਈ ਲਾਭਦਾਇਕ ਹੈ, ਇਸ ਲਈ ਤੁਹਾਨੂੰ ਦੇ ਇੱਕ ਪ੍ਰੋਗਰਾਮ ਨੂੰ ਕਰ ਸਕਦਾ ਹੈ 'ਤੇ ਵੇਖਣ ਨੂੰ ਇਸ ਚੱਕਰ.

ਸਾਈਕਲ , ਜਦਕਿ ਪਾਸਕਲ ਹੇਠ ਕੀਤੀ ਲੋੜ:

• ਜਦਕਿ (ਹਾਲਤ) (ਜੇ ਜ਼ਰੂਰੀ ਸ਼ੁਰੂ) ਹੈ.
• ਕਾਰਵਾਈ ਦੀ ਐਲਗੋਰਿਥਮ.
• ਅੰਤ (ਦੀ ਟੀਮ ਉਪਲੱਬਧਤਾ ਕਰਨ ਲਈ ਸ਼ੁਰੂ, ਜਦ).

ਪਹਿਲੀ ਲਾਈਨ - "ਕੈਪ" ਹੁਕਮ. ਹਾਲਤ ਨੂੰ ਇੱਕ ਅੰਕੀ ਮੁੱਲ ਅੰਕ 'ਤੇ ਜਾਣਕਾਰੀ ਵੇਰੀਏਬਲ ਨੂੰ ਸੀਮਿਤ (ਸ <100), ਹੋ ਸਕਦਾ ਹੈ ਵੇਰੀਏਬਲ ਦੀ ਕਿਸਮ ਬੁਲੀਅਨ (T = ਸੱਚ ਹੈ) ਜ ਸਤਰ (ਟੈਕਸ' ਹੈਲੋ '=). "ਸ਼ੁਰੂ" ਹੁਕਮ ਪਾ, ਜੇ ਲੂਪ ਹੋਰ ਵੱਧ ਇੱਕ ਦੀ ਹਾਲਤ ਨੂੰ ਕਰਨ ਲਈ ਜ਼ਰੂਰੀ ਹੈ. ਹੇਠ ਕਾਰਵਾਈ ਹੈ, ਜੋ ਕਿ ਪ੍ਰੋਗਰਾਮ ਨੂੰ ਇਸ ਸ਼ਰਤ ਤੇ ਕਿ ਜਦਕਿ ਲੂਪ ਚਲਾਇਆ ਹੈ, ਦੇ ਅਧੀਨ ਕੰਮ ਕਰਨ ਚਾਹੀਦਾ ਹੈ ਬਾਰੇ ਦੱਸਦਾ ਹੈ. ਇਹ ਹੁਕਮ, ਕਾਰਵਾਈ, ਫੰਕਸ਼ਨ, ਅਜਿਹੇ ਚੱਕਰ ਦੀ ਇੱਕ ਕਿਸਮ ਦੇ ਹੋ ਸਕਦੇ ਹਨ. ਅੰਤ ਵਿੱਚ ਇਸ ਨੂੰ, ਕਿ "ਅੰਤ" ਪਾ ਲਈ, ਜਦ ਤੱਕ, ਦੇ ਕੋਰਸ, ਪਹਿਲੀ ਲਾਈਨ ਸੀ, "ਸ਼ੁਰੂ" ਜ਼ਰੂਰੀ ਹੈ.

ਹੁਣ ਮਿਸਾਲ ਪ੍ਰੋਗਰਾਮ ਹੈ, ਜੋ ਕਿ ਸ਼ਾਮਿਲ ਹਨ ਹੁਕਮ ਬਾਰੇ ਦੱਸਦਾ ਹੈ ਵਿਚਾਰ. ਮਿਸਾਲ ਲਈ, ਸਾਨੂੰ ਪਹਿਲੀ n ਸਕਾਰਾਤਮਕ ਪੂਰਨ ਅੰਕ ਦੇ ਜੋੜ ਦੇ ਦਾ ਪਤਾ ਕਰਨ ਦੀ ਲੋੜ ਹੈ. ਇਸ ਨੂੰ ਅੰਤ ਵਿੱਚ ਕਰਨ ਲਈ, ਸ਼ੁਰੂ ਵਿੱਚ ਸਾਨੂੰ n ਤੇ ਵਿਚਾਰ (ਪਰ ਇਸ ਨੂੰ ਹਮੇਸ਼ਾ ਜ਼ੀਰੋ ਵੱਧ ਹੋ ਜਾਵੇਗਾ). ਫਿਰ ਚੱਕਰ ਸ਼ੁਰੂ ਕਰੋ. ਇਹ ਸਮਝਣ ਲਈ ਕਿ ਉਹ ਕੰਮ ਕਰਨ ਲਈ ਹੈ, ਜੋ ਕਿ ਜ਼ਰੂਰੀ ਹੈ, ਜਦ ਤੱਕ ਕਿ ਇਹ n ਦਾ ਮੁੱਲ ਪਹੁੰਚਦੀ ਹੈ. ਇੱਥੇ ਸਮੱਸਿਆ ਨੂੰ ਹੱਲ ਕਰਨ ਲਈ ਹੋਰ ਵੱਧ ਇੱਕ ਚੋਣ ਹੈ, ਪਰ ਸਾਨੂੰ ਵਿਰੋਧੀ ਹੈ, ਜੋ ਕਿ ਤੁਹਾਨੂੰ ਇੰਸਟਾਲ ਕਰਨਾ ਚਾਹੁੰਦੇ ਹੋ, ਦੀ ਵਰਤੋ ਨੂੰ ਪ੍ਰਭਾਵਿਤ ਹੈ, ਜੋ ਕਿ ਇਸ ਤੱਥ 'ਤੇ ਧਿਆਨ ਦਿੱਤਾ ਜਾਵੇਗਾ. ਮੂਲ ਰੂਪ ਵਿੱਚ, ਇਹ ਵੇਰੀਏਬਲ ਮੈਨੂੰ ਵਰਤ ਕੀਤਾ ਗਿਆ ਹੈ. ਤੁਹਾਨੂੰ ਨਾਲ ਸ਼ੁਰੂ ਇਸ ਨੂੰ ਇਸ ਨੂੰ "1" ਮੁੱਲ ਨਿਰਧਾਰਤ ਕਰਨ ਲਈ ਜ਼ਰੂਰੀ ਹੈ. ਵਿਰੋਧੀ ਹਰ ਨਵ ਿਜਹੜੇਘਰ ਕਾਰਵਾਈ ਨਾਲ ਇੱਕ ਮਿਆਦ ਦੇ ਤੌਰ ਤੇ ਸੇਵਾ ਕਰਦਾ ਹੈ. ਸਾਡੇ ਮਿਸ਼ਨ ਦੇ ਆਧਾਰ 'ਤੇ, ਲਗਾਤਾਰ ਇਸ ਨੂੰ ਕਰਨ ਲਈ ਇੱਕ ਸ਼ਾਮਿਲ ਕਰਨ ਦੀ ਹੈ. ਇਸ ਲਈ, ਜਦ ਕਿ ਇੱਕ ਅੰਕੀ ਦਾ ਸੂਚਕ ਵਿਰੋਧੀ ਨੂੰ ਨੰਬਰ n ਦਾ ਮੁੱਲ ਦੇ ਬਰਾਬਰ ਹੈ. ਇਹ ਕੰਮ ਦੇ ਪ੍ਰੋਗਰਾਮ ਨੂੰ ਮੁਕੰਮਲ ਕਰਨ ਲਈ ਸੰਕੇਤ ਹੋ ਜਾਵੇਗਾ. ਦੀ ਰਕਮ ਦਾ ਹਿਸਾਬ ਕਰਨ ਲਈ ਸਾਨੂੰ ਵੇਰੀਏਬਲ k ਪੇਸ਼. ਇਸ ਦੀ ਹਰ ਪੁਨਰਾਵ੍ਰੱਤੀ ਦੇ ਨਾਲ ਪਿਛਲੇ ਮੁੱਲ ਪਲੱਸ ਨੰਬਰ 'ਮੈਨੂੰ ਜਾਰੀ ਕਰ ਦਿੱਤਾ ਜਾਵੇਗਾ. ਗਿਣਤੀ ਦੇ ਅੰਤ ਦੇ ਬਾਅਦ, ਸਿਰਫ ਪਰਦੇ 'ਤੇ k ਜਾਣਕਾਰੀ ਵੇਰੀਏਬਲ ਸਿੱਟਾ ਕੱਢ. ਇਹ ਪ੍ਰੋਗਰਾਮ ਦੇ ਸ਼ਬਦ 'ਤੇ ਇੱਕ ਸੰਖੇਪ ਵਿਆਖਿਆ ਹੈ. ਹੁਣ ਸਾਨੂੰ ਕੋਡ 'ਤੇ ਝਾਤੀ.

Readln (n); '- ਸਾਨੂੰ ਦਾ ਨੰਬਰ n ਪੜ੍ਹਨ.

ਮੈਨੂੰ: = 1; k: = 0; '- ਕੰਮ ਦੇ ਵਿਰੋਧੀ ਵਿੱਚ ਪ੍ਰਵੇਸ਼ ਕਰੋ, ਸਾਨੂੰ ਰਕਮ ਦੇ ਮੁੱਲ ਨੂੰ ਬਾਹਰ ਫਿਲਹਾਲ.

ਮੈਨੂੰ <= n ਸ਼ੁਰੂ ਹੋ ', ਜਦਕਿ - ਕੰਮ ਚੱਕਰ ਦੇ ਹਾਲਾਤ ਕਾਇਮ ਕੀਤੀ.

k: = K + ਮੈਨੂੰ; ਮੈਨੂੰ: = i 1 +; '- ਦੀ ਰਕਮ ਅੱਪਡੇਟ ਵਿਰੋਧੀ ਨੂੰ ਮੁੱਲ ਸ਼ਾਮਿਲ ਕਰੋ.

ਨੂੰ ਖਤਮ; '- ਕੰਮ ਦੇ ਵੇਰਵੇ ਨੂੰ ਪੂਰਾ ਕਰਨ ਵੇਲੇ.

Writeln (K); - ਇਹ ਸਿੱਟਾ.

ਸਾਨੂੰ ਇਕ ਹੋਰ ਮਿਸਾਲ 'ਤੇ ਗੌਰ. ਹੁਣ ਸਾਨੂੰ ਕੀ-ਬੋਰਡ n ਨਾਮ ਦੇ, ਜੋ ਕਿ ਟੈਕਸਟ ਐਰੇ ਨੂੰ ਬਚਾਉਣ ਨਾਲ ਯੂਜ਼ਰ ਨੂੰ ਭਰਨ ਦੀ ਲੋੜ ਹੈ. ਅਸੂਲ ਇੱਥੇ ਪਿਛਲੇ ਕਰਨ ਦੇ ਸਮਾਨ ਹੈ. ਦਾ ਨੰਬਰ n ਦਿਓ, ਸਾਨੂੰ ਜਦਕਿ ਲੂਪ ਦਾ ਸੈੱਟ ਹਾਲਤ ਨੂੰ ਸਰਗਰਮ. ਅੱਗੇ, ਮੈਮੋਰੀ ਸੈੱਲ ਐਰੇ ਲਈ ਕੀ-ਬੋਰਡ ਇੰਪੁੱਟ ਨੂੰ ਦਰਸਾਉਣ. ਵਿਰੋਧੀ ਸੈੱਟ ਕਰੋ ਦੁਹਰਾਇਆ ਓਪਰੇਸ਼ਨ ਮੁਕੰਮਲ. ਅੱਗੇ, ਵਿਰੋਧੀ ਰੀਸੈੱਟ ਅਤੇ ਡਿਸਪਲੇਅ ਐਰੇ ਹੈ. ਪਰ, ਇਸ ਪ੍ਰਸੰਗ ਵਿੱਚ ਵਿਰੋਧੀ ਇੱਕ ਦੇ ਇੱਕ ਮੁੱਲ ਨਿਰਧਾਰਤ ਕਰਨ ਦਾ ਮਤਲਬ ਹੈ, ਦੇ ਬਾਅਦ ਤੁਹਾਨੂੰ ਜ਼ੀਰੋ ਸੈੱਲ ਐਰੇ ਲੈ ਕਰਨ ਦੇ ਯੋਗ ਨਹੀ ਹੋ ਜਾਵੇਗਾ (ਇਸ ਨੂੰ ਮੌਜੂਦ ਨਹੀ ਹੈ) ਨੂੰ ਰੀਸੈੱਟ. ਪ੍ਰੋਗਰਾਮ ਦੇ ਕੋਡ ਨੂੰ ਹੇਠ ਲਿਖੇ ਅਨੁਸਾਰ ਹੈ: ਇਸ ਪ੍ਰੋਗਰਾਮ ਵਿੱਚ ਤੁਹਾਨੂੰ ਕੁਦਰਤੀ ਸਕਾਰਾਤਮਕ ਨੰਬਰ ਦੇ ਇੱਕ ਨੰਬਰ ਹੈ, ਜੋ ਕਿ ਸਭ n ਦੀ ਜਾਣ-ਪਛਾਣ ਖਤਮ ਹੁੰਦਾ ਹੈ ਦਾ ਜੋੜ ਪ੍ਰਾਪਤ ਕਰੇਗਾ. ਇਹ ਸਮਝ ਜਾਣਾ ਚਾਹੀਦਾ ਹੈ, ਜੋ ਕਿ ਵਿਰੋਧੀ ਦੀ ਗੈਰ-ਮੌਜੂਦਗੀ ਵਿਚ ਪਾਸਕਲ ਚੱਕਰ ਕਦੇ ਜਦਕਿ ਖਤਮ. ਤੁਹਾਨੂੰ ਅਚਾਨਕ ਇਸ ਬਾਰੇ ਭੁੱਲ ਜੇ, ਪ੍ਰੋਗਰਾਮ ਦੇ ਕੋਡ ਨੂੰ ਚੱਲਣ ਦੀ ਵਿੱਚ, ਕੰਪਿਊਟਰ ਲਟਕ ਸ਼ੁਰੂ ਹੁੰਦਾ ਹੈ. ਇਹ ਬਟਨ "ਵਿਰਾਮ ਬਰੇਕ" ਮੰਨਿਆ ਜਾਵੇਗਾ. ਲਈ C 'ਤੇ ਵਰਤਣ ਵਿਭਿੰਨਤਾ ਜਾਣਕਾਰੀ ਵੇਰੀਏਬਲ ਜਵਾਬੀ ਹੈ.

Readln (n);

ੲ: = 1;

ਜਦਕਿ ੲ <= n ਸ਼ੁਰੂ ਹੋ '- ਪੌਦਾ ਹਾਲਾਤ.

Readln (ਇੱਕ [b]); ੲ: = C + 1; '- ਕੀ-ਬੋਰਡ ਦਾ ਡਾਟਾ ਪੜਦਾ ਹੈ, ਸਾਨੂੰ ਵਿਰੋਧੀ ਨੂੰ ਮੁੱਲ ਸ਼ਾਮਿਲ ਕਰੋ.

ਨੂੰ ਖਤਮ; '- ਚੱਕਰ ਨੂੰ ਪੂਰਾ.

ੲ: = 1; '- schetiku ਅਸਲੀ ਮੁੱਲ ਨੂੰ ਵਾਪਸ.

ਜਦਕਿ ੲ <= n ਲਿਖਣ ਕੀ (ਇੱਕ [b]); '- ਨਾਮ n ਵੇਖੋ.

ਫਿਰ ਤੁਹਾਨੂੰ ਸਕਰੀਨ n ਨਾਮ ਦੇ ਕੀ-ਬੋਰਡ ਤੱਕ ਕੀਤਾ ਗਿਆ ਹੈ, ਜੋ ਕਿ 'ਤੇ ਪ੍ਰਾਪਤ ਕਰੋ. ਹੈ, ਜੋ ਕਿ 'ਤੇ, ਇੱਕ ਜਦਕਿ ਲੂਪ ਨੂੰ ਖਤਮ ਹੁੰਦਾ ਹੈ. ਇਹ ਦੋਨੋ ਸ਼ੁਰੂਆਤ ਹੈ ਅਤੇ ਤਕਨੀਕੀ ਉਪਭੋਗੀ ਦੁਆਰਾ ਵਰਤਿਆ ਗਿਆ ਹੈ. ਉਹ ਦੀ ਗਿਣਤੀ ਕਰਦਾ ਹੈ, ਅਤੇ ਇਸ ਲਈ ਪਰੋਗਰਾਮਰ ਅਤੇ ਇੱਕ ਵਾਧੂ ਵੇਰੀਏਬਲ ਕਰਨ ਲਈ ਵਿਸ਼ੇਸ਼ ਧਿਆਨ ਦੀ ਲੋੜ ਹੈ.