ខណៈពេលរង្វិលជុំគឺមានប្រយោជន៍សម្រាប់អ្នកសរសេរកម្មវិធី

អ្នកសរសេរកម្មវិធីដើម្បីសុខភាពអាចនឹងមិនទាន់ស៊ាំមានប្រយោជន៍មួយខណៈពេលរង្វិលជុំ។ នេះគឺជាការប្រតិបត្ដិវដ្តធម្មតាមួយនៅមធ្យមលោក Pascal ។ នេះគឺជាការមានប្រយោជន៍នៅក្នុងបញ្ហានានា, ដូច្នេះមើលអំពីរបៀបដែលអ្នកអាចធ្វើឱ្យកម្មវិធីមួយនៃ វដ្តនេះ។

វដ្ត ខណៈពេលដែលលោក Pascal តម្រូវឱ្យមានការធ្វើឱ្យមានដូចខាងក្រោម:

• ខណៈពេលដែល (លក្ខខណ្ឌ) តើ (ចាប់ផ្តើមបើចាំបាច់) ។
• ក្បួនដោះស្រាយសកម្មភាព។
• បញ្ចប់ (នៅពេលដែលក្រុមនេះបានចាប់ផ្តើមដើម្បីអាចរកបាន) ។

បន្ទាត់ដំបូង - "CAP" ពាក្យបញ្ជា។ ជម្ងឺនេះអាចនឹងមានតម្លៃចំនួនកំណត់ការពន្យល់នៅលើចំនួនគត់អថេរ (ឃ <100), ប្រភេទប៊ូលីនអថេរ (t = ពិត) ឬខ្សែអក្សរ (tex = 'ជំរាបសួរ') ។ "ចាប់ផ្ដើម" ពាក្យបញ្ជាដាក់ប្រសិនបើរង្វិលជុំគឺជាការចាំបាច់ដើម្បីអនុវត្តលក្ខខណ្ឌច្រើនជាងមួយ។ ខាងក្រោមនេះរៀបរាប់អំពីសកម្មភាពដែលកម្មវិធីនេះត្រូវអនុវត្តនៅក្រោមលក្ខខណ្ឌថារង្វិលជុំខណៈពេលដែលត្រូវបានប្រតិបត្តិនោះ។ វាអាចមានភាពខុសគ្នានៃបទបញ្ជានីតិវិធី, មុខងារ, វដ្តនេះ។ នៅទីបញ្ចប់វាគឺជាការចាំបាច់ដើម្បីដាក់ពាក្យបញ្ជា "ចុង" លុះត្រាតែជាការពិតណាស់ដែលជាបន្ទាត់ដំបូងគឺ "ចាប់ផ្តើម" ។

ឥឡូវពិចារណាកម្មវិធីឧទាហរណ៍ដែលមានរៀបរាប់អំពីពាក្យបញ្ជា។ ឧទាហរណ៍យើងត្រូវស្វែងរកផលបូកនៃចំនួនគត់វិជ្ជមានដំបូង n នេះ។ ដើម្បីចុងបញ្ចប់នេះ, ដំបូងយើងពិចារណា n (ទោះបីជាវានឹងតែងតែធំជាងសូន្យ) ។ បន្ទាប់មកចាប់ផ្តើមវដ្ត។ វាជាការសំខាន់ក្នុងការយល់ថាគាត់មានដើម្បីធ្វើការរហូតដល់វាឈានដល់តម្លៃនៃ n ។ នៅទីនេះមានជម្រើសច្រើនជាងមួយដើម្បីដោះស្រាយបញ្ហានេះប៉ុន្តែយើងនឹងផ្តោតលើការពិតដែលថាការប្រើប្រាស់នៃការប្រឆាំងប៉ះពាល់ដល់ដែលអ្នកចង់ដំឡើងនេះ។ តាមលំនាំដើមនេះត្រូវបានធ្វើដោយការប្រើអថេរខ្ញុំនេះ។ មុនពេលអ្នកចាប់ផ្តើមជាមួយនឹងវាគឺជាការចាំបាច់ក្នុងការកំណត់វាតម្លៃនៃ "1" មួយ។ ការប្រឆាំងនេះបានបម្រើការជារៀងរាល់សកម្មភាពរយៈពេលចរន្តជាមួយនឹងការថ្មីមួយ។ ដោយផ្អែកលើបេសកកម្មរបស់យើងជានិច្ចបន្ថែមមួយទៅវា។ ដូច្នេះនៅពេលដែលសន្ទស្សន៍ការរាប់លេខស្មើតម្លៃនៃចំនួន n នេះ។ នេះនឹងក្លាយជាសញ្ញាសម្រាប់ការបញ្ចប់នៃកម្មវិធីការងារនេះ។ ដើម្បីគណនាចំនួនដែលយើងបានណែនាំនេះមាន k អថេរ។ ដោយមានពាក្យផ្ទួនគ្នារបស់វានឹងត្រូវបានកំណត់តម្លៃពីមុនបូកចំនួនខ្ញុំបាន។ បន្ទាប់ពីការបញ្ចប់នៃការរាប់បានតែឈានទៅដល់មាន k អថេរពន្យល់នៅលើអេក្រង់។ នេះជាការពន្យល់សង្ខេបនៅលើពាក្យនៃកម្មវិធីនេះ។ ឥឡូវនេះយើងមើលកូដ។

Readln (n); '- យើងបានអានចំនួន n ។

ខ្ញុំ: = 1; k = 0; '- ចូលទៅក្នុងការប្រឆាំងការងារដែលយើងបានសូន្យចេញតម្លៃនៃផលបូកនេះ។

ខណៈពេលដែលខ្ញុំ <= n តើការចាប់ផ្តើម "- កំណត់លក្ខខណ្ឌនៃវដ្តការងារនេះ។

k: = k + ខ្ញុំ! ខ្ញុំ: = i + 1; '- បន្ថែមតម្លៃរាប់ការធ្វើឱ្យទាន់សម័យទៅចំនួនទឹកប្រាក់។

បញ្ចប់; '- ខណៈពេលដែលបញ្ចប់ការរៀបរាប់នៃការងារនេះ។

Writeln (K); - ការសន្និដ្ឋានទាំងនេះ។

យើងមើលឧទាហរណ៍មួយទៀត។ ឥឡូវនេះយើងត្រូវការដើម្បីបំពេញអ្នកប្រើដែលមានឈ្មោះក្តារចុច n ដែលនឹងជួយសង្គ្រោះអារេអត្ថបទ។ គោលការណ៍នៅទីនេះគឺស្រដៀងគ្នាទៅនឹងអតីតកាល។ បញ្ចូលលេខ n យើងបានធ្វើឱ្យស្ថានភាពរង្វិលជុំសំណុំខណៈពេល។ លើសពីនេះទៀតបញ្ជាក់បញ្ចូលក្តារចុចទៅអារេក្រឡាចងចាំ។ កំណត់បញ្ចប់ប្រតិបត្ដិការប្រឆាំងការធ្វើម្តងទៀត។ បន្ទាប់មកទៀតការប្រឆាំងនេះគឺបានកំណត់ឡើងវិញនិងការបង្ហាញអារេមួយ។ ទោះជាយ៉ាងណា, កំណត់ការប្រឆាំងនៅក្នុងបរិបទនេះមានន័យថាការកំណត់តម្លៃនៃការមួយ, ចាប់តាំងពីអ្នកនឹងមិនអាចនាំយកមកនូវអារេក្រឡាសូន្យ (វាមិនមាន) ។ កូដកម្មវិធីនេះគឺមានដូចខាងក្រោម: នៅក្នុងកម្មវិធីនេះអ្នកនឹងទទួលបានផលបូកនៃចំនួននៃលេខវិជ្ជមានធម្មជាតិដែលបញ្ចប់សេចក្តីណែនាំនៃ n បំផុត។ វាគួរតែត្រូវបានយល់ថានៅក្នុងការអវត្ដមាននៃការប្រឆាំងនោះ, ខណៈពេលដែលវដ្តលោក Pascal មិន បញ្ចប់។ ប្រសិនបើអ្នកស្រាប់តែភ្លេចអំពីវា, នៅក្នុងការប្រតិបត្តិនៃកូដកម្មវិធីកុំព្យូទ័របានចាប់ផ្តើមដើម្បីព្យួរ។ វាត្រូវបានចាត់ទុកប៊ូតុង "ផ្អាកសម្រាក" ។ ក្នុងនាមជាអ្នកការប្រឆាំងសម្រាប់ការប្រើប្រាស់នៅលើការពន្យល់អំពីភាពចម្រុះអថេរគមួយ។

Readln (n);

គ: = 1;

ខណៈពេលដែលគ <= n តើការចាប់ផ្តើម - លក្ខខណ្ឌរុក្ខជាតិ។

Readln (មួយ [គ]); គ: = C + 1; '- អានទិន្នន័យពីក្តារចុច, ដែលយើងបានបន្ថែមតម្លៃដល់ទៅរាប់។

បញ្ចប់; '- ការបញ្ចប់វដ្ត។

គ: = 1; '- schetiku ត្រឡប់តម្លៃដើម។

ខណៈពេលដែលគ <= n ធ្វើការសរសេរ (មួយ [គ]); '- បង្ហាញឈ្មោះ n ។

បន្ទាប់មកអ្នកនឹងទទួលបាននៅលើអេក្រង់ n ឈ្មោះដែលបានបញ្ចូលពីក្តារចុច។ នៅពេលនោះរង្វិលជុំខណៈពេលបញ្ចប់។ វាត្រូវបានប្រើដោយអ្នកចាប់ផ្តើមដំបូងនិងអ្នកប្រើកម្រិតខ្ពស់។ គាត់មិនរាប់, ហេតុដូច្នេះហើយតម្រូវឱ្យមានការយកចិត្តទុកដាក់ជាពិសេសដល់អ្នកសរសេរកម្មវិធីនិងអថេរបន្ថែមទៀត។