Delphi

Calcular y visualizar por pantalla, el área de un triangulo, suministrándole por teclado la base y la altura.
SOLUCIÓN  PROGRAMA NUMERO 1
(Area del Triangulo)
Comienzo preparando los controles que necesito en un ficha nueva como puedes ver en la imagen.
[pic]
Objetos utilizados: Los textos que ves como Base, Altura, Area y el titulo principal; son controles Tlabel . Los cuadros para la basey altura son TEdit; y el boton es un control TButton; todos ellos de la paleta standard. Observa los nombres que les he puesto, en realidad solo es necesario dar nombre a los controles que vamos a nombrar por nuestra cuenta, aunque siempre podemos utilizar el nombre por defecto que les dá el Delphi, pero es más feo.
Simplemente luego en el evento On_Clic del boton Calcular coloco el siguientecodigo que puedes ver en el listado completo del programa. Hacerte observar que yo simplemente he escrito 'a dedo' el codigo del  evento On_Clic del boton Calcular; el resto lo ha construido el Delphi mientras que yo he ido arrastrando objetos a la ficha:
Por ultimo comentarte dos ordenes que pueden llamarte la atención:
|strtoint    |Que convierte un texto en número entero. Es necesario paraoperar con él ya que los   TEdit reciben valor |
| |alfanumerico. |
|inttostr    |Que convierte un  número entero a texto. Necesario para albergar el numero de la     solución a la etiqueta area. |


El delphi dispone de otras ordenes de este tipo para convertirdatos.
Y este es el programa ejecutando:
[pic]








1. Realizar un programa que lea del teclado un número correspondiente al radio de la circunferencia, visualizando la longitud de la misma y el área del circulo correspondiente. Se recuerda: AREA=PI * RADIO2 y LONGITUD=2*PI*RADIO
SOLUCIÓN  PROGRAMA NUMERO 2
(Area y longitud de la cinrcunferencia)
Comienzo preparando loscontroles que necesito en un ficha nueva como puedes ver en la imagen.
[pic]
Objetos utilizados: Los textos que ves como Radio, Area, y Longitud, son controles Tlabel . Los cuadros a la derecha de cada control son TEdit. He puesto un botón(TButton) para lanzar el calculo  y otro botón para cerrar el programa ; todos ellos de la paleta standard. Observa los nombres que les he puesto, en realidad solo esnecesario dar nombre a los controles que vamos a nombrar por nuestra cuenta, aunque siempre podemos utilizar el nombre por defecto que les dá el Delphi, pero es más feo.
Hacerte observar que yo simplemente he escrito 'a dedo' el codigo del  evento On_Clic del boton Calcular y el  codigo evento On_Clic del botón Cerrar; el resto lo ha construido el Delphi mientras que yo he ido arrastrandoobjetos a la ficha (Esto es un chollo).
Comentarte dos ordenes que pueden llamarte la atención:
|val |Que convierte un texto en valor número. Es necesario para operar con él ya que los   TEdit reciben valor |
| |alfanumerico. Podria haber utilizado strtoint |
|str    |Que convierte un valor número a texto. Necesario para albergar el numero de la     solución a la etiqueta area. |
| |Podria haber utilizado inttostr |


Y este es el programa ejecutando:
[pic]
2. Programa que calcule y visualice la suma de los N primeros números enteros. Siendo N un número que seobtiene del teclado.
SOLUCIÓN  PROGRAMA NUMERO 3
(Suma de los N primeros números)
Comienzo preparando una vez más los controles que necesito en un ficha nueva como puedes ver en la imagen.
[pic]
Objetos utilizados: El titulo principal "Calculo la suma de ......." y NUMERO, son controles Tlabel . Tambien tengo otro control Tlabel que puedes adivinar en la parte de abajo de la ficha, llamado SUMA,...