p

r

o

g

r

a

m

e

n

s

h

u

0

1

i

m

p

l

i

c

i

t

n

o

n

e

i

n

t

e

g

e

r

:

:

s

e

i

r

e

k

i

,

j

o

u

t

a

i

r

e

a

l

,

d

i

m

e

n

s

i

o

n

(

1

2

)

:

:

k

i

o

n

d

o

r

e

a

d

(

*

,

'

(

i

4

,

1

2

f

5

.

1

)

'

,

i

o

s

t

a

t

=

j

o

u

t

a

i

)

s

e

i

r

e

k

i

,

k

i

o

n

i

f

(

j

o

u

t

a

i

/

=

0

)

e

x

i

t

w

r

i

t

e

(

*

,

'

(

i

4

,

1

2

f

6

.

1

)

'

)

s

e

i

r

e

k

i

,

k

i

o

n

e

n

d

d

o

e

n

d

p

r

o

g

r

a

m

e

n

s

h

u

0

1