lunes, 7 de febrero de 2011

Cadena, concatenar y media del vector

Hoy hemos hecho 3 programas: cadena, concatenar y media del vector.
El de cadena trataba de introducir tu nombre y que te diga el número de letras que tiene. La variable tiene que ser ansistring. El color del texto del nombre y del resultado que te dice el número que tiene son de diferentes colores. Para ello hay que poner textcolor (color), el color se puede poner escribiendo su nombre en inglés o poniendo el número que corresponde al color. Para que cuente el número de letras se utiliza la función: length (nombre).
El programa de concatenar consistía en escribir dos textos y que se unieran en otra fila y columna de la pantalla. Las variables tienen que ser ansistring y se necesitan 3. La operación para sumar los textos es: c:=a+b. Para que el resultado salga en otra parte de la pantalla, hay que poner la función: gotoxy(x,y), en x e y hay que poner los números de columna y fila que quieres que salga.
El último programa era la media del vector. Consistía en calcular la media de un vector de 5 elementos. Hay que poner de variables: v : array[1..5] of real (vector de 5 elementos), y dos números reales que se utilizarán para realizar la suma y la media del vector. Primero se hace la suma de los 5 elementos y después el resultado se divide entre 5 para hacer la media (ya que en total son 5 elementos). Para introducir los elementos hay que poner: v[1], v[2]... También hemos usado el textcolor para que la frase y el resultado estén en diferente color. Para ello, hay que hacerlo en una línea diferente y el 'write' tiene que ser sin 'ln' para que escriba en la misma línea.

No hay comentarios: