Ejercicios en Turbo Pascal

Estimados estudiantes, le presento los ejercicios que deben resolver en el Programa Turbo Pascal, para la fecha estipulada en clase.

1) Sumar todos los números naturales desde el 1 hasta el 100, ambos incluidos.

2)   Una compañía de seguro está abriendo un departamento de Finanzas y estableció un programa para captar clientes, que consiste en lo siguiente: si el monto asegurado es menor a 500 BsF  el costo de la póliza será el 10% del monto asegurado, y si el monto asegurado es mayor o igual a 500 BsF el costo de la póliza será el 6% del monto asegurado. El costo de la póliza se pagará en 12 cuotas mensuales, Se desea determinar cuál será el monto de la cuota que debe pagar el cliente.

3) Una empresa de bienes raíces ofrece viviendas de interés social, bajo las siguientes condiciones:a. Si los ingresos del comprador son menores o iguales a 1500 BsF la inicial será del 15% del costo de la casa y el resto se distribuirá en pago mensuales, a cancelar durante 25 años.b. Si los ingresos del comprador son mayores a 1500 BsF la inicial será del 30% del costo de la casa y el resto se distribuirá en pago mensuales, a cancelar durante 15  años.La empresa quiere conocer cuánto debe pagar un comprador por concepto de inicial y el monto de las cuotas mensuales.

4) Programa que pida la estatura (en metros) y sexo (V/M) de un número indeterminado de personas (mientras el operador quiera). Posteriormente escribirá la estatura media de los varones y la estatura media de las mujeres.

Muy pronto anunciaré el proyecto final......