Programlama dili Pascal, Free Pascal programı ile yılın 12 ayı nasıl ifade edilir?

Free Pascalda Yılın 12 ayı yazılacak ve bu ayların kaçar gün sürdüğü çıkacak şekilde bir ödevim var.Uygun bir dille yazıp yardımcı olursanız sevinirim. Bu konuyu hocaya anlatmam lazım..Yalnız algoritma dilinde yazılacak.