Reporte # 6 Lenguajes Imperativos

Los Lenguajes que elegí son : C, Fortran, Pascal y Basic

C
El programa que hice es el siguiente: 
Este es un programa que busca en una matriz el numero de veces que se repite determinado numero.

Compilamos...

Primero nos pide el numero de filas y columnas, en este caso, hice una matriz de 3x3

Luego nos pide cada elemento de la matriz;

Después nos pide el numero que va a buscar : yo elegi el 2

y al final "imprime" la matriz y el numero de veces que se repite el numero buscado:

Fortran
El programa calcula el factorial de un numero:

FUNCTION factorial(n) 

INTEGER factorial

INTEGER, INTENT(IN) :: n

IF (n==0) THEN

factorial = 1

ELSE

factorial = factorial * factorial(n-1)

END IF

END FUNCTION factorial

Pascal

El programa en pascal calcula el área de un triangulo en base a los datos que damos:

Program area;

var area, base, altura : real;

begin

write ('Dame Base : ');

readln(base);

write('Dame Altura: ')

readln(altura);

area := (base * altura)/2 

writeln('El Area es =', area:0:2);   {:0:2 sirve para dar el formato de salida al numero}

readln;

end

Basic

Programa que calcula la serie de fibonacci:

Private Sub Form_Load()
Dim fibonacci(20) As Long
Dim i As Integer
fibonacci(1) = 1
fibonacci(2) = 1
For intCount = 3 To 10
fibonacci(intCount) = fibonacci(intCount - 1) + fibonacci(intCount - 2)
Next intCount
For i = 1 To 10
Debug.Print fibonacci(i)
Next i
End Sub

Bibliografía

http://es.wikipedia.org/wiki/C_(lenguaje_de_programaci%C3%B3n)

http://en.wikipedia.org/wiki/C_(programming_language)

http://www.fismat.umich.mx/mn1/manual/

http://es.wikipedia.org/wiki/Fortran

http://mat21.etsii.upm.es/ayudainf/aprendainf/Fortran90/Fortran90.pdf