jueves, 11 de noviembre de 2010

Reporte #6: Lenguajes Imperativos

Bueno este es mi reporte #6, tenemos que hacer 1 programa en 4 lenguajes diferentes.

1.- FORTRAN

Este es el codigo de un programa que nos da la suma de 2 valores.

program SUMA
 real A, B, C
     write (*,*) 'Valor de a:'
     write (*,*) 'Valor de b:'
     read (*,*) A, B
     C = A + B
     write (*,*) 'La suma es: ', C
     end program
Imagen

Este es un programa que nos pide el perimetro de un rectangulo.
CODIGO
program rectangulo
real a,b
      write (*,*) 'Dame el valor de a:'
      write (*,*) 'Dame el valor de b: '
      read  (*,*) a
      read (*,*) b
      Perimetro = 2*a+2*b
      write (*,*) 'El perimetro del rectangulo es = ', perimetro
      stop
      end program
IMAGEN
Y por ultimo un programa que nos pide el area del rectangulo.
CODIGO
program rectangulo
  real a,b
      write (*,*) 'Da el valor de a:'
      write (*,*) 'Da el valor de b: '
      read  (*,*) a
      read (*,*) b
      area = b*a
      write (*,*) 'El area del rectangulo es: = ', area
       stop
      end program
IMAGEN

2.- PASCAL

Este es un programa que nos adivina un numero.
CODIGO

program adivina_numero;
uses crt;
var numero, n, i: integer;
 begin
clrscr;
writeln(‘Adivina el numero, esta entre 0 y 15’);
randomize;
numero := random(16);
i := 0;
repeat
i := i + 1;
write(‘Dame un numero: ‘);
readln(n);
until numero=n;
writeln  (‘si adivinaste!’);
writeln(‘El numero era:  ’, numero);
writeln(‘Adivinaste en el intento numero: ‘, i);
readkey;
end.
IMAGEN

Y este es un codigo que nos da el promedio de ciertos alumnos.
CODIGO
program promedio_alumnos;
uses crt;
var cantidad, cont, numero, s:integer;
begin
clrscr;
s:=0;
writeln(‘Numero de alumnos: ’); Read(Cantidad);
for cont:=1 to cantidad do
begin
writeln(‘Calificacion: ’, cont,’:’);
read(numero);
s:=s+numero;
end;
writeln(‘El promedio total de los alumnos es: ’, s/cantidad:0:2);
Readkey;
end.
IMAGEN
3.- C

Este en un programa que nos da el area y el perimetro.

CODIGO
#include<stdio.h>
#include<conio.h>
#include<math.h>
main()
{
      float RADIO, AREA, PERIMETRO, PI=3.1416;
      printf("Numero del RADIO: ");
      scanf("%f", &RADIO);
      AREA=PI*(pow(RADIO,2));
      printf("El resultado de la operacion es: %.6f \n", AREA);
      PERIMETRO=(2*PI*RADIO);
      printf("El PERIMETRO sera: %.6f", PERIMETRO);
      getch();
}

IMAGEN

Este programa nos convierte la cantidad de dolares a pesos mexicanos.
CODIGO
#include<stdio.h>
#include<conio.h>
main()
{
      float DOLARES, PESOS;
      printf("Introduce el valor de dolares a convertir: \n");
      scanf("%f", &DOLARES);
      PESOS=(DOLARES*12.95);
      printf("El resultado de la convercion es: %f", PESOS);
      getch();
}
IMAGEN

4.- ALGOL

Este es un programa que hace la conversion de grados fahrenheit a celsius.

CODIGO

fahrenheit
begin
real fahr;
print ("Degrees Fahrenheit: ");
read (fahr);
print ("The degrees Celsius are: ", (fahr-32.0) * 5.0/9.0);
end
finish
Bueno este es m reporte y espero que cumpla con el objetivo.
Paola E. Cantú Aguilar 1429400

10 comentarios:

  1. hola!!

    me encanto el esfuerzo que hiciste al poner porgramas extras.. ademas de que estan bien estructurados y muy completos !!

    =) felicidades !

    ResponderEliminar
  2. :)
    hola como estas
    me gusto el esfuerzo que pusiste en cada programa que elaboraste, tu presentacion esta muy bien y los lenguajes que pusiste son los correctos, las imagenes que pusiste de cada programa facilitan el entendimiento del codigo y pues tu reporte cumple con lo necesario y pues tu trabajo te quedo excelente
    felicididades sige asi
    nos vemos!
    bye

    ResponderEliminar
  3. Hola! esta muy bien tu reporte, estan buenos tus programas y que bien que pones imagenes

    saludos =)

    ResponderEliminar
  4. muy bien tu reporte, estan muy explicados, los programas ya con las imagenes esta mejor, aun que creo que deviste aver explicado un poco mas lo que hace cada codigo

    ResponderEliminar
  5. explicaste muy bien tus programas y me gusto que los separaras muy bien y fueras paso por paso:D

    ResponderEliminar
  6. muy bien por el reporte ahora si esta muy completo :D

    ResponderEliminar
  7. Super bien, esta sueper completo que bien que pusiste la impresion de pantallas, me hubiese gustado que agregaras tipo las referencias pero como qiera esta muy bien tu reporte!

    ResponderEliminar
  8. Hola me parece muy completo tu reporte, ya que incluyes el codigo y pones las imagenes .

    ResponderEliminar
  9. Muy bien, aunque el último programa no sé si es de tu autoría (no me pusiste referencias tampoco). Considerando que hiciste más programas de los que se pidieron, prácticamente vas a tener todos los puntos.

    Calificación: 4.9/5

    ResponderEliminar
  10. hola, esta muy completo tu reporte muy bien

    ResponderEliminar