CW3 (3)

e>

O. • fi - x~ ln by e^x \'x - cos ax

gdzie O. = [or_;, a₂, ct- ], P = \fi_x, ft₂ » Pl ]>⁰ składowych REAL*4, a, b, x, y są REaL"4 0

(x¹-y²)a,

e^^sin² yx — cos” &n:

gdzie ć? = \ci\, C£-> #3 ] c składowych !NTEGER“-x. y są DOUBLE PRECISION, oraz y, co są REAL-4 .

Uwaga: W Fortranie argument funkcji obliczającej pierwiastek nie może być typu bteger. g)

Z • -,'gv 4- f3w

gdzie a, są DOUBLE PRECISION oraz V, W, Z są COM?LEX*16.

6.    Instrukcji o jakiej etykiecie zostanie przekazane sterowanie w wyniku wykonania się następującej

instrukcji?

IF((A+B/R-c)36,012/l

jeżeli A=3.4, B«2.09, C»-6.3, R-2.I .

7.    Napisz fragment programu obliczający wartość wyrażenia

x = f(y)~ 407.6-10³

gdzie

!y² - 0.3, y < 0,

y - z + 2 oraz f(y) =

] 0,    0 < y < 1 ,

[ y² -y. y >i.