program
Date d ('ddmmyy')
Date d1 ('dd/mm/yy')
Date e ('Eddmmyy')
Date e1 ('Edd/mm/yy')
Compute d='011206'
Compute d1='011206'
Compute e='011206'
Compute e1='011206'
write d d1 e e1
Compute d='01/12/06'
Compute d1='01/12/06'
Compute e='01/12/06'
Compute e1='01/12/06'
write d d1 e e1
Compute d='1 12 6'
Compute d1='1 12 6'
Compute e='1 12 6'
Compute e1='1 12 6'
write d d1 e e1
end program
|