26



6



1949







22



5



1946







25



10



1973







1



12



1974



­ data:

:





























































26



6



1949







22



5



1946







25



10



1973







1



12



1974



 

 

dni: '

data , 26, 6, 1949

data , 22,5, 1946

data , 25, 10, 1973

data , 1, 12, 1974

data , 0, 0, 0







!

1. data

.

2.

data
- , .

, . ­ data, .

, :

'



ls

( ) print

dni restore dni

렠 do

(, d, , g) read nn$, d, m,

g




= if nn$ = exit then do


(, d, m, g) print nn$, d, m, g

렠 loop

end

. - ­ , .