8 de febrero de 2011

En este programa hemos utilizado la dentro de la función "If" un "Begin y End", para la condicion que que si eres mayor de edad te ponga un texto en un color especifico y si no, otro texto con otro color.

Esquema

Begin
--If (variable) > o > o = X then
------Begin

------End.
--else
------Begin

------End.
End.

7 de febrero de 2011

Este programa nos permite contar cuantal letras hay, en este caso, en nuestro nombre completo.


Funciones nuevas
textcolor (numero) Para poner el texto en el color que deseemos, también lo podemos escribir en ingles el color que deseemos.
length (variable que hemos introducido) Cuenta el numero de caracteres que hay escritos (también cuanta los espacios).

4 de febrero de 2011

Con este programa hemos aprendido a juntar dos textos y a llevarlos a una posición determinada.



Funciones nuevas
Gotoxy (15,9) Con esta función lo que hacemos es que el texto vaya a las coordenadas x = 15 e y = 9 (en el programa como si fueran dos Tabulaciones).

3 de febrero de 2011

Este programa pregunta tu nombre, edad y luego te dice que edad tienes (un poco irónico). No hemos utilizado funciones nuevas, solo a la hora de que te diga tu edad que te poner dentro del "write()" la variable -nombre-.



Elementos nuevos
Var
X: ansistring (Definimos una cadena de caracteres de longitud variable)

1 de febrero de 2011

En este ejercicio hemos aprendido a usar la función "If".


Funciones nuevas:
If "condición" then (si cumple la condición) que haga lo que le pidamos y else (si no cumple la condición) que haga otra acción.