DIGITALNA ARHIVA ŠUMARSKOG LISTA
prilagođeno pretraživanje po punom tekstu




ŠUMARSKI LIST 5-6/1976 str. 16     <-- 16 -->        PDF

c
c
c
c
c
c
c
c
c
c
c
c


c
c


c
c


iOl


SOI


2
3





5


13


12


KO U IDA ZA PREMD POSLA. AKO JE NS « 0 POSAfl 5E PREKIDA
ir (MSIiOl i502»50l


CTT ^ PODATKE 7.A ANALIZU „„,,, ,
i1|.Jl - VEKTOR DULJINE U - BROJ POLUMJERA ZA PROFIL J
:JX(J1 - VEKTOR DJLJME ´´ " 5TAROST PHoMLA J
Y(I,JI - lATRICA REDA 11(11*1 - POLUMJERI I-TOS PRESJEKA


J-TjG PROFILA ZADANI U CENTIMETRIMA


AK) SE IA KARTICI SA PROMJERIMA fJALAZI TOCNo lO (ILI NA DVIJE
KARTICE TOČNO 2.)l PROMJERA TADA TREBA STAVCI JOS JEDNU PRAZM,


KARTICU
X(I)


I.illl
CO ITI´IJE


- VEKTOR DULJINE 11(1) - VISINE DO PRESJEKA I - U
ÜETRIMA, .


" VEKTOR DULJILE II< I 1 - 3R"J f.ODOVA NA PRESJEKU I,


DO 334 I»lt 30
X( I 1=3


IXt I) " o
VI I) = 3
ll(I l"0


IG( I 1=0


0 0 i 31 S =1.33
Zli. JI-J.O
Y ( I.J) =3,0


DO i J=l."
READ 2, IP.NX« i>,FO´MAT (|2.i3,l)F5,2/l3F5.2/l3F5,2)


l( )) = IP
REAL) ». IP, (X(I),1=1. IP)
REAt) 5..IP. l|GAKO NA KARTICI ,)00E TOCJO 13 X(I),
POSTAVITI IZA NJE PRAZNJ KARTICU
FOR IAT (l2,lOF5.2/nF5.2/lOF5.2)


FOR 1AT I 12,21 I J I


:iAC l´IA POVRŠINE PRESJEKA U OETRIHA


0 0 < 0=1,´I
MP« 1(1)
!)0 A 1= 1 .MP
Z( I ,.))= 3,ltl59»( Y( I.J)/1J0. )*»2


RAC-J´U VOLUOE´lE PRlFILA U 1ETRIMA


DO 1 3 J»l i *
I´ ( ) I =J3
;)0 li J=li I


IP= X J>-1


00 12 1= 1, IP


11=1+1


P(.J)«P( J) + (Z( I 1 , JI+71 I . Jl )»(X( U )-X( I ) i
n ( 11 P t J i 12


(ĐO.)A JE VR IOVE)


(RAČUNA VISINE )0 vR IA ZA PROFIL I)


KVADRAT´!])


KUBIČNIM (00 NAJVIŠEG PRESJFKU)