Imagen del codigo
Aqui les dejo la imagen donde lo corri
Aqui les dejo la imagen donde lo corri
c------Programa que determina la cantidad de raices de una función cuadratica
write(6,*) 'Coeficiente de la variable que esta al cuadrado: '
read(5,*) a
write(6,*) 'Coeficiente de la variable lineal: '
read(5,*) b
write(6,*) 'valor independiente: '
read(5,*) c
discriminante= (b*b)-(4*a*c)
if discriminante.LT.0 then
write(6,*) 'No tiene una raiz real '
else
if discriminante.EQ.0 then
res=(-1*b)/(2*a)res=(-1*b)/(2*a)
write(6,*) 'Tiene una raiz real es: ' res
else
res=((-1*b)-(sqrt(descriminante)))/(2*a)
res2=((-1*b)+(sqrt(descriminante)))/(2*a)
write(6,*) 'Tiene 2 raices reales son: '
endif
endif
stop
endif
PROGRAMA DE FIBONACCI
PROGRAMA FIBONACCI
REAL A,B,C
INTEGER N
WRITE(*,*)'CUANTOS NUMEROS DE FIBONASSI QUIERES:'
READ (*,*) N
A = 1
DO I = 1, n
READ (*,*)SUMA
SUMA = SUMA + SUMA
END DO
PROM = SUMA/N
WRITE(*,*)'EL PROMEDIO ES DE:',PROM
END
PROGRAMA DE NUMEROS PRIMOS
NUMEROS PRIMOS
PROGRAM FIBONASSI
REAL A,B,C
INTEGER N
WRITE(*,*)'QUE NUMERO QUIERES SABER SI ES PRIMO'
READ (*,*) N
A = 1
B = 0
C = 0
DO I = 1, n
C = A + B
B = A
A = C
WRITE(*,*)'NUMERO DE FIBONASI NUMERO:',I
WRITE(*,*)C
END DO
END
Bueno espero que les guste bye.
C
Lo siguiente es el codigo
Bueno este programa se trata de lo siguiente lo subi como presentación ojala les guste.
Como ya se dieron cuenta este programa saca el numero de catalan ya explicado en la presentación pero en este caso se saca recursivamente.
CORRIDA
PASCAL
Aqui les dejo la imagen del codigo de mi programa se trata otraves de los numeros de catalan pero en este caso iterativamente en el lenguaje Pascal.
Aqui les dejo la imagen de la corrida
EJEMPLOS DE LENGUAJES IMPERATIVOS
Se denomina ALGOL (o Algol) a un lenguaje de programación. La voz es un acrónimo de las palabras inglesas Algorithmic Language (lenguaje algorítmico).
Fue muy popular en las universidades durante los años 60, pero no llegó a cuajar como lenguaje de utilización comercial.
El lenguaje COBOL (acrónimo de COmmon Business -Oriented Language, Lenguaje Común Orientado a Negocios) fue creado en el año 1960 con el objetivo de crear un lenguaje de programación universal que pudiera ser usado en cualquier ordenador, ya que en los años 1960 existían numerosos modelos de ordenadores incompatibles entre sí, y que estuviera orientado principalmente a los negocios, es decir, a la llamada informática de gestión.
Pascal es un lenguaje de programación desarrollado por el profesor suizo Niklaus Wirth a finales de los años 60. Su objetivo era crear un lenguaje que facilitara el aprendizaje de la programación a sus alumnos. Sin embargo con el tiempo su utilización excedió el ámbito académico para convertirse en una herramienta para la creación de aplicaciones de todo tipo.
Pascal se caracteriza por ser un lenguaje de programación estructurado fuertemente tipificado. Esto implica que:
El código esta dividido en porciones fácilmente legibles llamadas funciones o procedimientos. De esta forma Pascal facilita la utilización de la programación estructurada en oposición al antiguo estilo de programación monolítica.
El tipo de dato de todas las variables debe ser declarado previamente para que su uso quede habilitado.
REFERENCIAS
En los lenguajes de programación un tipo de dato es un atributo de una parte de los datos que indica al ordenador (y/o al programador) algo sobre la clase de datos sobre los que se va a procesar.
Esto incluye imponer restricciones en los datos, como qué valores pueden tomar y qué operaciones se pueden realizar.
Tipos de datos comunes son:
-enteros
-números de coma flotante (decimales)
-cadenas alfanuméricas
-fecha
-horas
-colores
-coches etc...