EJEMPLO DEL TEMA 6 - PowerPoint PPT Presentation

About This Presentation
Title:

EJEMPLO DEL TEMA 6

Description:

Calcular suma de una col. Calcular sumas de frecuencias de todas columnas ... recibe las frecuencias (vf) y los valores (vx)y devuelve la media como un numero real ... – PowerPoint PPT presentation

Number of Views:57
Avg rating:3.0/5.0
Slides: 14
Provided by: juanfernn3
Category:
Tags: del | ejemplo | tema | col | la

less

Transcript and Presenter's Notes

Title: EJEMPLO DEL TEMA 6


1
EJEMPLO DEL TEMA 6
  • ARRAYS BIDIMENSIONALES

2
  • Consumo (C) y renta mensual (RM) de 100 familias
    (expresadas en 104 )
  • Diseñar e implementar un programa en Pascal que
    obtenga las medias y desviaciones típicas de las
    distribuciones marginales

C RM 15 5 35 45
30 10 15
40 5 20 25
50 15 5 5
3
datos_tabla.txt
C RM 15 5 35 45
30 10 15
40 5 20 25
50 15 5 5
Calculo medias y d.tipicas marginales
Leer datos de fichero
Calcular media marginal de C
Calcular d.tipica marginal de C
Calcular media marginal de RM
Calcular d.tipica marginal de RM
4
datos_tabla.txt
C RM 15 5 35 45
30 10 15
40 5 20 25
50 15 5 5
Calculo medias y d.tipicas marginales
Leer datos de fichero
Calcular sumas de frecuencias de todas columnas
Calcular media marginal de C
Calcular suma de una col.
Calcular d.tipica marginal de C
Aplicar fórmula de la media a las frecuencias y
valores de C
Calcular media marginal de RM
Mostrar la media
Calcular d.tipica marginal de RM
5
datos_tabla.txt
C RM 15 5 35 45
30 10 15
40 5 20 25
50 15 5 5
Calculo medias y d.tipicas marginales
Leer datos de fichero
Calcular media marginal de C
Calcular d.tipica marginal de C
Aplicar fórmula de la d. tipica a las frecuencias
y valores de C
Calcular media marginal de RM
Calcular d.tipica marginal de RM
6
datos_tabla.txt
C RM 15 5 35 45
30 10 15
40 5 20 25
50 15 5 5
Calculo medias y d.tipicas marginales
Leer datos de fichero
Calcular sumas de frecuencias de todas filas
Calcular media marginal de C
Calcular suma de una fila.
Calcular d.tipica marginal de C
Aplicar fórmula de la media a las frecuencias y
valores de RM
Calcular media marginal de RM
Mostrar la media
Calcular d.tipica marginal de RM
7
datos_tabla.txt
C RM 15 5 35 45
30 10 15
40 5 20 25
50 15 5 5
Calculo medias y d.tipicas marginales
Leer datos de fichero
Calcular media marginal de C
Calcular d.tipica marginal de C
Calcular media marginal de RM
Aplicar fórmula de la d. tipica a las frecuencias
y valores de RM
Calcular d.tipica marginal de RM
8
  • Maria del Mar LeeDatosdeFichero
  • Yasin SumaFilasdeMatriz
  • Alex SumaColumnasdeMatriz
  • Sonia CalculaMediadeVector
  • Maria Teresa CalculaDTipicadeVector
  • Maria José Ensambla el programa.

9
  • program experimento
  • const
  • carray 1..4 of integer (15,25,35,45)(valore
    s de C)
  • RMarray 1..3 of integer (30,40,50)(valores
    de RM)
  • var
  • filaarray 1..4 of integer(guarda suma
    columnas)
  • columnaarray 1..3 of integer(guarda suma
    filas)
  • fichtext(fichero de datos)
  • tablaarray1..3,1..4 of integer (guarda las
    frecuencias de la distribucion)
  • m1,m2,dt1,dt2real(medias y desv.tipicas
    marginales)

10
  • (Declaracion de procedimientos)
  • procedure lee_datos (var tabarray of array of
    integer var ficherotext)
  • (lee datos del fichero y los devuelve en tab)
  • procedure suma_filas (tabarray of array of
    integer var col array1..3 of integer)
  • (recibe la tabla y una columna vacia, suma las
    filas y las guarda en la columna)
  • Var i,jinteger
  • Begin
  • For ilow(tab) to high(tab) do
  • For j low(tab0) to high(tab0) do
  • coli coli tabi,j
  • End

11
  • procedure suma_columnas (tabarray of array of
    integer var filarray 1..4 of integer)
  • (recibe la tabla y una fila vacia,suma las
    columnas y las guarda en la fila)
  • Var i,j integer
  • BEGIN
  • For i low(tab0) to high(tab0)) do
  • For j low(tab) to high(tab) do
  • fili fili tabj,i
  • END

12
  • function media_datos (vfarray of integervx
    array of real)real
  • (recibe las frecuencias (vf) y los valores (vx)y
    devuelve la media como un numero real)
  • function dsviacion_tipica (vf,vxarray of
    integer mediareal)real
  • (recibe las frecuencias(vf) y los valores (vx) y
    la media y devuelve la desviacion tipica como un
    numero real)

13
  • (Programa principal)
  • begin
  • assign (fich,'datos_tabla.txt')
  • lee_datos (tabla, fich)
  • suma_columnas (tabla,fila)
  • suma_filas (tabla,columna)
  • m1 media_datos(fila,c)
  • m2 media_datos(columna,rm)
  • dt1 desviacion_tipica (fila,c,m1)
  • dt2 desviacion_tipica (columnas,rm,m2)
  • writeln ('La media del costo es ', m1)
  • writeln ('La media de rm es ',m2)
  • writeln ('La desviacion tipica del costo es
    ',dt1)
  • writeln ('La desviacion tipica de rm es ',dt2)
  • end.
Write a Comment
User Comments (0)
About PowerShow.com