START

Czytaj:

OPCJA

OPCJA

Czytaj:

l1,l2,l3

l4,l5,l6

l7,l8,l9

q1,q2,P

MM

1

1

Czytaj:

l1,l2,l3

l4,l5,l6

l7,l8,l9

q1,q2,P

MM

OTWORZ

PLIK

dane.dat

Wypisz:

l1,l2,l3

l4,l5,l6

l7,l8,l9

q1,q2,P

MM

Zapisz:

l1,l2,l3

l4,l5,l6

l7,l8,l9

q1,q2,P

MM

OTWORZ

PLIK

dane.dat

Wywołaj

proc.

BLK

i:=1

i:=i+1

i<=K

x:=(i-1)*(L/K)

Wywołaj

proc.

BLK

Wypisz:

Ra,Rb,Rc

Wypisz:

x,T,M

Wywołaj

proc.

BLK

i:=1

i:=i+1

i<=K

x:=(i-1)*(L/K)

Wywołaj

proc.

BLK

Wypisz:

Ra,Rb,Rc

Wypisz:

x,T,M

OTWORZ

PLIK

wyniki.grf

ZAMKNIJ

PLIK

wyniki.grf

1

2

3

4

5

6

STOP

99

2

T

T

N

N

ZAMKNIJ

PLIK

dane.dat

ZAMKNIJ

PLIK

dane.dat

Procedura blk

START

x<=L1

T:= jak w dok.

M:= jak w dok

x>L1

i

x<=(L1+L2)

T:= jak w dok.

M:= jak w dok

T

T

N

N

x>(L1+L2)

i

x<=(L1+L2+l3+L4)

T:= jak w dok.

M:= jak w dok

T

N

x>(L1+L2+L3+L4)

i

x<=(L1+L2+l3+L4

+L5)

T:= jak w dok.

M:= jak w dok

T

N

x>(L1+L2+L3+L4

+L5)

i

x<=(L1+L2+l3+L4

+L5+L6)

T:= jak w dok.

M:= jak w dok

T

N

x>(L1+L2+L3+L4

+L5+L7)

i

x<=(L1+L2+l3+L4

+L5+L6+L8)

T:= jak w dok.

M:= jak w dok

T

N

x>(L1+L2+L3+L4

+L5+L7+L8)

i

x<=(L1+L2+l3+L4

+L5+L6+L8+L9)

T:= jak w dok.

M:= jak w dok

T

N

Ra:= jak w dok.

Rb:= jak w dok.

Rc:= jak w dok.

STOP

Program graficzny

i:=1

i:=i+1

i<=K

Wypisz na ekran:

Ra,Rb,Rc

Rsyuj linie

dla T i M

OTWORZ

PLIK

wyniki.grf

ZAMKNIJ

PLIK

wyniki.grf

T

N

Czytaj:

Ra,Rb,Rc

Czytaj:

T,M

START

STOP