Osnove programskog

jezika QBasic
 QBASIC
• Korisničko sučelje
• Elementi
• Ulazno / Izlazne instrukcije
• Instrukcije grananja ((odluke)
odluke)
• Programske petlje
• Funkcije
• Datoteke
 Korisničko sučelje u kojem se gradi
QBASIC program

• File - New, Open, Save, Save As.., Print, Exit

• Edit - Cut, Copy, Paste, Clear, Sub, Fun
• View - Subs, Split, Output screen
• Search - Find, Repeat Last Find, Change
• Run - Start (shit+F5),Restart, Continue
• Debug - Otklanjanje pogrešaka
• Options - Opcije
• Help - Index, Contents, Topic QBasic
 Elementi QBASIC-a

• Variables and Constants

• Operators and Formulas
• Hierarchy of operations
• Uses of parentheses ((uporaba
uporaba
zagrada
zagrada))
• Assigning ((pridruživanje)
pridruživanje)
 Variables and Constants
• Numeric - Real
A=12.33 AB=1.11E+03
Nizovi
A1=13.22 AC1=2.77E-05
• Integer • Real
A=12 • Integer
A1=13 • String
• String
A(10)
A$=“123”
AB$=“ Pero”
AB$=“Pero” A$(15)
 Arithmetic Operators

Operator Example Meaning

+ A+B Add A to B
- A- B Substract B from A
* A*B Multiple A by B
/ A/ B Divide A by B
^ A ^ B Calculate A to the power B
 Arithmetic Relational Operators
Operator Example Meaning
= A=B A is equal to B
< A<B A is less than B
> A>B A is greater than B
<=,=< A <= B A is less than or equal to B
>=,=> A >= B A is greater than or equal to B
<>, >< A <> B A is not equal to B

String Relational Operators

- vrijedi isto ali za stringove -
 Hierarchy of operations
A = 15^ 2 + 12*2 + (35 * 8)

→ (35 * 8) = 280
→ 15^ 2 = 225
→ 12*2 = 24
→ 225 + 24 = 249
→ 249 + 280 = 529
 Arrays - Nizovi (real, integer, string)
Program za unos deset varijabli:
Deklaracija niza Ne koristi se niz
Input A
For i = 1 to 7 Input B
Input A(i) Input C
Next i Input D
Input E
Input F
Input G
 Ulazno (Input) / Izlazne (Print)
instrukcije
I. Način
Input A, B
II. Način
C=A+B
Print “Unesi A”;
Print C Input A
Print “Unesi B”; III. Način
Input B Input “Unesi A i B”;A,
C=A+B C=A+B
Print C Print “A+B=”, C
Ulazne instrukcije Read - Data - Restore

Primjer 1:
Read A,B,C,D Primjer 2:
Print C Read A,B,C,D Primjer 3:
Data 2,3,4,5 Print C Read A,B
Data 2,3,4 Print B
Restore
Read C
Print C
Data 2,3,4
 Instrukcije grananja If … Than … Else
Primjer 1: Primjer 2:
Input A,B Input A,B
if A<B Then if A<B Then
x = A*B x = A*B
Else ElseIf A>0 Then
x = A+B x = A+B
Endif ElseIf A=0 Then
x = A/B
Else B = 0
x = A-B
Endif
 Programske petlje 1/5

REM Instrukcija IF ... THEN … ELSE

CLS
n=1
10 PRINT "Ana"
n=n+1
IF n <= 5 THEN 10
 Programske petlje 2/5

REM Petlja pomoću instrukcije FOR ...

NEXT
FOR i = 1 to 5
PRINT "Ana"
NEXT i
 Programske petlje 3/5

DO WHILE i< 10
i=i+1
print i DO
LOOP i=i+1
print i
LOOP WHILE i<10
 Programske petlje 4/5
REM Umetnuta petlja pomoću
instrukcije
odluke IF ... THEN
CLS
i=1
20 j = 1
10 PRINT "Ana"
IF j < 3 THEN j = j + 1: GOTO 10
PRINT "*****"
IF i < 3 THEN i = i + 1: GOTO 20
 Programske petlje 5/5

REM Umetnuta petlja pomoću FOR ... NEXT

CLS
FOR i = 1 TO 3
FOR j = 1 TO 3
PRINT "Ana"
NEXT j
PRINT "*****”
NEXT i
 Funkcije

• Trigonometrijske
• Funkcije sa stringovima
• Funkcije vremena i datuma
• Funkcije pretvorbe
• Ostale
Funkcije - Trigonometrijske

REM Funkcije sin(x); cos(x)

CLS
pi = 3.141592
FOR i = 0 TO 360 STEP 15
PRINT i; "(st) ";
PRINT "cos -> "; (COS(i * (pi / 180)));
PRINT "sin -> "; (SIN(i * (pi / 180)))
SLEEP (1)
NEXT i
 Funkcije - Trigonometrijske

REM Funkcije atn(x); tan(x)

CLS
CONST PI = 3.141592654#
FOR i = 15 TO 180 STEP 15
PRINT "atn ->"; i; "(st) "; ATN(TAN(PI / i))
PRINT "tan ->"; i; "(st) "; (TAN(i * (PI / 180)))
NEXT i
Funkcije - Funkcije sa stringovima

• INSTR • SPC
• LEFT$ • SPACE$
• RIGHT$ • LTRIM$
• LEN • RTRIM$
• MID$
• VAL
• STRING$
 Funkcije - Funkcije vremena i datuma
• DATE$
• TIME$

Funkcije - Funkcije pretvorbe

• ASC - ASCII u decimalni ekvivalenmt

• CHR$ - decimalni ekvivalent u ASCII
• HEX$ - decimalni u HEX
• OCT$ - decimalni u OCT
 Funkcije - Ostale

• ABS
• SGN
• rnd (randomize)
 Funkcije - grafika
Rem Pravci i zvuk
REM Boja SCREEN 7
SCREEN 7 i=1
10 xa = 20 * i
FOR i% = 0 TO 15
ya = 10
COLOR i% xb = 700 - 50 * (i - 1)
PRINT i% yb = 300
REM SLEEP (2) i=i+1
NEXT i% IF xa > xb THEN STOP
LINE (xa, ya)-(xb, yb)
SOUND 100 * i, 10
GOTO 10
 Potprogrami - Subroutine
REM Poprogram - slučaj GOSUB
CLS
PRINT " i i*i"
PRINT "-------------------"
FOR i% = 1 TO 10
GOSUB Square
NEXT i%
END
Square:
PRINT i%, i%*i%
RETURN
 Potprogrami - Subroutine
REM Poprogram - slučaj DECLARE
DECLARE SUB kvad (i%)
CLS
PRINT " i i*i "
PRINT "------------------"
FOR i% = 1 TO 10
kvad (i%)
NEXT i%
END
SUB kvad (i%)
PRINT i%, i% * i%
END SUB
 Organizacija podataka
- datoteke u QBASIC-u -

• Temeljna znanja o organizaciji podataka u

datoteke podataka
• Podaci i procesi
• Jednostavni primjeri za unos i čitanje
podataka
• Program za unos i čitanje podataka s
korištenjem potprograma
 Zašto datoteke ? - Primjer 1
1. Izvršite popis učenika u razredu.
2. Unesite popis u računalo.
3. Izvršite SORT po ancednom redu.
4. Tiskajmo izvještaj.
• PROBLEM !!!
• Došao/ otišao učenik !
• Što učiniti ?
• Očito - Ponoviti radnje po stavkama 1.; 2.; 3. i 4.
• DA LI JE OVO UČINKOVITO ?? (Sigurno nije !)
 Primjer 2: Osobni karton djelatnika

Podaci koji se vode - evidentiraju u osobnom

kartonu:
– Prezime
– Ime
– Adresa stanovanja
• Ulica i broj
• mjesto
– Jedinstveni matičbi broj građanina
– Telefonski broj
 Temeljni pojmovi:

Datoteka (File): Organizirani skup podataka

koji se obrađuju kao cjelina i posprema u
memoriju računalnog sustava.

Podatak (Date):Bilo koji predmet mišljenja koji

može prenijeti informaciju; Formalizirani
znakovni prikaz činjenica, pojmova i instrukcija
pogodan za priopćavanje, interpretaciju ili
obradu;
 Datoteka - sadržaj, vrste
Datoteka - Tekstualni sadržaj (DOC, TXT)
Datoteka - Programska (BAS, PAS, FOR …)
Datoteka - Slika (WMF, GIF, BMP, ICO …)
Datoteka - Animacija (AVI, JPG, MOV ….)
Datoteka - Zvuk (WAW …)
Datoteka - Arhivska (ZIP, ARJ, BAK …)
Datoteka čiji su sadržaj podaci je predmet
rasprava i analiza ovog dijela izlaganja
Podatkovna datoteka
 Podatkovna datoteka
Definicija: Skup podataka koji mogu biti
predmet obrade jednog ili više programa
u nekom programskom jeziku.
Struktura:
Datoteka(File) - Zapis (Record) - Polje
(Field)
Organizacija- Ustroj: Logička i fizička
organizacija podataka.
Podatkovna datoteka - Struktura
Antić

Jukić
Zapis

Osobni karton

Prezime Kuzmanić
Ime Kuzma
JMBG 1203940380001
Adresa Teslina 111 Polje
Mjesto Split
Telefonski broj 123-231
 Podatkovna datoteka
Organizacija- Ustroj: Logička i fizička
organizacija podataka.
Logička organizacija: Skup logičko-
semantičkih zapisa koji se odnose na
određeni niz pojmova iste vrste. Svaki
logički zapis u datoteci ima isti opis i isti
redosljed polja podataka u svojoj
strukturi.
Fizička organizacija: Skup fizičkih zapisa
na fizičkom nosiocu podataka (masovnom
memorijskom mediju, radnoj memoriji)
 Tipični procesi - procedure za
obradu podataka
• Unos podataka
• Ažuriranje podataka
– Brisanje
– Promjene
• Prikazi podataka
– Izvještaji
– Traženja