Programiranje u BASIC-u/BKontrolne strukture /REPEAT ... UNTIL

Uvod uredi

REPEAT...UNTIL (eng. REPEAT hrv. PONOVI, eng. UNTIL hrv. DOK ) je naredba koja stvara kontrolnu strukturu uvjetne petlje u programu. Kontrolna struktura izvršava jednom i na kraju petlje se vrši ispitivanje

Primjeri uredi

Sjedeći primjeri napisani su u QBASICu, broj linije nije potreban u QBASICU i tu je radi preglednosti i lakšeg objašnjavanja rada programa.

Prvi uredi

   CLS
   B = INT(RND*20)+1
   PRINT "Igra pogađanja"
   POGODAK=0
   REPEAT
      INPUT "Pogodi broj između 1 i 20", A
      IF A<1 OR A> 20 THEN PRINT "Greška u unosu. Upišite broj između 1 i 20"
      IF A = B THEN PRINT "Pogodak ! " : POGODAK=1
      ELSEIF A<B THEN PRINT "Prenisko, pokušaj opet!" 
      ELSE PRINT "Previsoko, pokušaj opet!" 
      END IF
   UNTIL POGODAK=1

Objašnjenje uredi

Prvi uredi

  1. CLS - CLS je engleska skraćenica od Clear Screen (hrv. očisti zaslon): ova komanda briše sve sa ekrana. Ovu komandu ima večina inačica jezika BASIC, za one koje ne posjeduju ovu naredbu brisanje ekrana se postiže ispisivanjem nekih kontrolnih znakova

Vanjske poveznice uredi