mam rodny cislo a potrebuju ho rozsekat na mesic den a rok

mam promennou a a v ni je treba 781201
a ted chci do promenne rok dat 78, do promenne mes dat 12 a do promenne den dat 1

jak to mam udelat?