Teknik Coding: Perulangan Berkesinambungan

25 Mar, 2010

Salah satu teknik dalam pemrograman yang saya temukan. Penggunaan looping berkesinambungan ini sangatlah bermanfaat, contohnya dalam membuat menu utama.

Banyak programmer yang tidak mempertimbangkan efektifitas dalam suatu perulangan, baik pemula maupun programmer yang sudah berpengalaman. Dengan menggunakan teknik ini, koding akan lebih optimal dan efektif.

BASIC

DO WHILE 1
    ' Masukkan blok program yang akan diulang terus menerus di sini.
    ' Gunakan perintah "EXIT DO" untuk keluar dari perulangan.
LOOP

Pascal

while true do
begin
    // Masukkan blok program yang akan diulang terus menerus di sini.
    // Gunakan perintah "exit" untuk keluar dari perulangan.
end

C/C++

while(1) {
    // Masukkan blok program yang akan diulang terus menerus di sini.
    // Gunakan perintah "break" untuk keluar dari perulangan.
}

Contoh penggunaan dalam program:

Contoh penggunaan dalam BASIC

DIM pil AS STRING
 
DO WHILE 1
    CLS
 
    PRINT "Perulangan dimulai di sini:"
    INPUT "Apakah kamu ingin mengulang (Ya/Tidak) "; pil
 
    SELECT CASE LCASE$(pil)
        CASE "y", "ya", "yes"
        CASE "n", "no", "t", "tidak"
            EXIT DO
        CASE ELSE
            CLS
            PRINT "Jawaban yang kamu berikan salah!"
            DO WHILE INKEY$ = ""
            LOOP
    END SELECT
LOOP
 
CLS
 
PRINT "Kamu telah keluar dari perulangan!"
 
LOCATE 25, 20
PRINT "Tekan sembarang tombol untuk keluar!"
DO WHILE INKEY$ = ""
LOOP
 
END

Contoh penggunaan dalam Pascal

uses crt;
 
var pil: char;
 
begin
    while true do
    begin
        clrscr;
 
        writeln('Perulangan dimulai di sini:');
        write('Apakah kamu ingin mengulang (Y/N) ? '); readln(pil);
 
        case lowerCase(pil) of
            'y': continue;
            'n': break;
            else
                writeln('Jawaban yang kamu berikan salah!');
                readkey;
        end;
    end;
 
    clrscr;
 
    writeln('Kamu telah keluar dari perulangan!');
    readkey;
end.

Contoh penggunaan dalam C/C++

#include "stdio.h"
#include "conio.h"
 
void main() {
    char pil;
 
    while(1) {
        clrscr();
 
        printf("Perulangan dimulai di sini:\n");
        printf("Apakah kamu ingin mengulang (Y/N) ? "); scanf("%s", &pil);
 
        if(toupper(pil) == 'Y') continue;
        if(toupper(pil) == 'N') break;
 
        printf("Jawaban yang kamu berikan salah!");
        getch();
    }
    printf("Kamu telah keluar dari perulangan!");
    getch();
}

Photo by Pixabay from Pexels

#BASIC #PASCAL #C++#loop