crear programa para imprimir un cuadrado, un triangulo y un rombo en pascal

[caste]

hola, necesito que alguien me diga o me pase el codigo para hacer un programa en pascal extendido, que me dibuje en pantalla un cuadrado un triangulo y un rombo dependiendo de lo que se le pida, tiene que incluir sobre todo sentencias for.....etc (nivel muy basico)