Segítene valaki pascal nyelvben?

Nem tudom ezt a feladatot:

Készítsünk programot, amely bekér egy egész számot (1-től 100-ig), majd kiírja az adott számot szavakkal.

A szó kiírásához előbb nézzük meg hogy a szám tízzel osztható-e, ha igen, akkor írjuk ki case segítségével: tíz, húsz, harminc, stb.

Ha a szám nem osztható tízzel, nézzük meg mi áll a tízesek helyén a számban (div fügvénnyel) és ez szerint előbb írjuk ki egy case segítségével hogy: tizen, huszon, harminc, stb. (ha nulla van a tízesek helyén akkor semmit ne írjunk ki), majd nézzük meg hogy mi áll az egyesek helyén (mod fügvénnyel) és ez alapján írjuk ki mellé egy másik case segítségével hogy: egy, kettő, három, stb.