Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Instructiuni care descriu structurile de control
- Structura alternanta
- a) Decizia
- IF conditie [THEN]
- secv1
- [ELSE
- secv2]
- ENDIF
- b) Selectia
- DO CASE
- CASE cond1
- secv1
- CASE cond2
- secv2
- ..........
- CASE cond N
- secvN
- [OTHERWISE] secv0
- ENDCASE
- 2. Structuri de control repetitive
- a)
- DO WHILE cond
- secv
- ENDDO
- In cadrul secventei pot sa apara comenzile LOOP respectiv EXIT
- LOOP - intrerupe executia buclei si reia conditia din DO WHILE
- EXIT - intrerupe executia buclei si trece la executia urmatoarei comenzi de dupa ENDDO
- b)
- FOR contor=Vi TO Vf [STEP pas]
- secv
- [LOOP]
- [EXIT]
- ENDFOR
- Obs: daca nu se precizeaza valoarea pasului valoarea implicita a acestuia este 1
- FOR i=1 TO RECCOUNT()
- GO i <=> LIST
- DISP
- ENDFOR
- 3. Comanda SCAN permite parcurgerea tabelei curente elem cu elem
- SCAN [domeniu] [FOR conditie]
- secv
- [LOOP]
- [EXIT]
- ENDSCAN
- Ex: Sa se determ media maxima a elevilor cu varsta de 16 ani
- SCAN FOR varsta=16
- IF media>max
- max=media
- ENDIF
- ENDSCAN
- MENIU:
- INPUT "OPTIUNEA: " TO O
- DO WHILE O<>0
- DO CASE
- CASE O=1
- ...
- CASE O=2
- ...
- CASE O=N
- ENDCASE
- INPUT "OPTIUNEA: " TO O
- ENDDO
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement