Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- //30% +
- // sa se afiseze prod a caror cantitati sunt mai mici decat 50 in vederea aprovizionarii
- pt aceasta folosim intructiunea scan
- --intruct
- end scan
- Intruct suntaplicate fiecarei inreg din db, de asemeni vom folosi if(cond) then
- instr1
- else
- instr2
- endif
- Vom incerca sa scriem un program.
- Modi comm p1
- SET TALK OFF
- CLEAR
- USE produse
- SCAN
- replace pret WITH pret+pret*30/100
- ENDSCAN
- LIST nume, pret
- Lansarea in executie: do p1
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement