โปรแกรมเมอร์มือใหม่อาจยังไม่คุ้นเคยมีประโยชน์อย่างหนึ่งในขณะที่วนซ้ำ นี่คือการดำเนินการแบบวนรอบโดยทั่วไปในสภาพแวดล้อมของปาสคาล สะดวกในการนำไปใช้ในงานต่างๆดังนั้นเราจะวิเคราะห์ว่าวงจรนี้สามารถรวมอยู่ในโปรแกรมได้อย่างไร
Pascal's While Loop ต้องการสิ่งต่อไปนี้:
- ในขณะที่ (เงื่อนไข) ทำ (เริ่มต้นถ้าจำเป็น)
- อัลกอริทึมของการกระทำ
- สิ้นสุด (หากมีคำสั่งเริ่มต้น)
บรรทัดแรกคือส่วนหัวของคำสั่งเงื่อนไขสามารถเป็นค่าตัวเลข จำกัด ของตัวแปรจำนวนเต็ม (d <100) ค่าของตัวแปรประเภทบูลีน (t = True) หรือสตริง (tex = "hello") คำสั่ง "เริ่มต้น" จะถูกวางไว้หากต้องตรงตามเงื่อนไขมากกว่าหนึ่งเงื่อนไขในเนื้อหาของลูป ต่อไปนี้เป็นคำอธิบายเกี่ยวกับสิ่งที่โปรแกรมควรทำเมื่อขณะที่ลูปกำลังทำงาน สามารถมีคำสั่งขั้นตอนฟังก์ชันต่างๆเช่นลูป ในตอนท้ายคุณต้องใส่คำสั่ง "end" ถ้าแน่นอนบรรทัดแรกคือ "begin"
ตอนนี้เรามาดูตัวอย่างของโปรแกรมที่มีคำสั่งที่อธิบายไว้ ตัวอย่างเช่นเราต้องหาผลบวกของจำนวนเต็มบวก n ตัวแรก สำหรับสิ่งนี้ในตอนแรกเราจะพิจารณา n (ปล่อยให้มันมากกว่าศูนย์เสมอ) จากนั้นเราจะเริ่มวงจร สิ่งสำคัญคือต้องเข้าใจว่าควรใช้งานได้จนกว่าจะถึงค่าของจำนวน n มีตัวเลือกมากกว่าหนึ่งในการแก้ปัญหา แต่เราจะมุ่งเน้นไปที่ตัวเลือกที่มีผลต่อการใช้ตัวนับที่ต้องติดตั้ง โดยค่าเริ่มต้นตัวแปร i ถูกใช้สำหรับสิ่งนี้ ก่อนที่จะเริ่มใช้งานคุณต้องกำหนดค่าเป็น "1" ตัวนับทำหน้าที่เป็นส่วนเสริมสำหรับการดำเนินการรอบใหม่แต่ละครั้ง จากงานของเราเราต้องเพิ่มงานอย่างต่อเนื่อง ดังนั้นสักวันหนึ่งตัวบ่งชี้ตัวเลขของตัวนับจะเท่ากับค่าของจำนวน n นี่จะเป็นสัญญาณยุติโปรแกรม ในการคำนวณผลรวมเราแนะนำตัวแปร k ด้วยการทำซ้ำใหม่แต่ละครั้งจะมีการกำหนดค่าก่อนหน้าบวกกับหมายเลข i หลังจากการนับครั้งสุดท้ายคุณจะต้องแสดงตัวแปร k บนหน้าจอเท่านั้น นี่คือคำอธิบายสั้น ๆ เกี่ยวกับโปรแกรม ทีนี้มาดูโค้ดโปรแกรมกัน
Readln (n); "- อ่านหมายเลข n
ผม: = 1; k: = 0; "- เรานำตัวนับเข้าสู่การทำงานรีเซ็ตค่าของผลรวม
ในขณะที่ฉัน <= n เริ่มต้น "- ตั้งค่าเงื่อนไขสำหรับลูป
k: = k + ฉัน; ฉัน: = ฉัน + 1; "- เพิ่มมูลค่าให้กับจำนวนเงินอัปเดตตัวนับ
จบ; "- กรอกรายละเอียดของการดำเนินการ While
Writeln (k); - เราแสดงข้อมูล
ลองมาดูตัวอย่างอื่นตอนนี้เราต้องการให้ผู้ใช้กรอก n ชื่อจากแป้นพิมพ์ซึ่งจะถูกบันทึกไว้ในอาร์เรย์ข้อความ หลักการที่นี่คล้ายกับอดีต ป้อนหมายเลข n เปิดใช้งานลูป While ตั้งเงื่อนไข ต่อไปเราจะแสดงข้อมูลจากแป้นพิมพ์ไปยังหน่วยความจำของเซลล์อาร์เรย์ เราตั้งค่าตัวนับดำเนินการซ้ำให้เสร็จสมบูรณ์ ต่อไปเราจะรีเซ็ตตัวนับและแสดงอาร์เรย์ True การเป็นศูนย์ตัวนับในบริบทนี้หมายถึงการกำหนดค่าเป็นหนึ่งเนื่องจากคุณไม่สามารถแสดงเซลล์ศูนย์ของอาร์เรย์ได้ (ไม่มีอยู่) รหัสโปรแกรมมีดังนี้: จากโปรแกรมนี้คุณจะได้ผลรวมของชุดของจำนวนเต็มบวกบวกซึ่งลงท้ายด้วยจำนวนที่ป้อน n ควรเข้าใจว่าในกรณีที่ไม่มีตัวนับลูป While Pascal จะไม่สิ้นสุด หากคุณลืมมันทันทีในขณะที่รันโค้ดโปรแกรมคอมพิวเตอร์จะหยุดทำงาน ซึ่งได้รับการปฏิบัติด้วยปุ่ม "หยุดพักชั่วคราว" สำหรับการเปลี่ยนแปลงเราใช้ตัวแปร c เป็นตัวนับ
Readln (n);
c: = 1;
ในขณะที่ c <= n เริ่มต้น "- การตั้งค่าเงื่อนไข
อ่าน (a [c]); ค: = c + 1; "- อ่านข้อมูลจากแป้นพิมพ์เพิ่มมูลค่าให้กับตัวนับ
จบ; "- เราจบวงจร
c: = 1; "- เราคืนค่าเริ่มต้นให้กับตัวนับ
ในขณะที่ c <= n เขียน (a [c]); "- แสดง n ชื่อบนหน้าจอ
หลังจากนั้นคุณจะได้รับ n ชื่อบนหน้าจอซึ่งถูกป้อนจากแป้นพิมพ์ นี่เป็นการสรุปการแนะนำของคุณเกี่ยวกับลูป While ถูกใช้โดยทั้งผู้เริ่มต้นและผู้ใช้ขั้นสูง ไม่มีตัวนับดังนั้นจึงต้องให้ความสนใจเป็นพิเศษจากโปรแกรมเมอร์และตัวแปรเพิ่มเติม