SoloCodigo

Tengo que realizar este programa en lenguaje de Programacion Pascal Estandard y no se komo acerlo, me seria de enorme ayuda si alguien lo hiciera por mi antes de este Lunes. Gracias de antemano.

Problema:

En la resolucion de diversos problemas de ingeniera se utilizan matrices cuasivacias, que son aquellas que contienen un pequeño numero de elementos no nulos. Un modo miy simple de describirles de forma condensada, consiste en indicar sus dimiensiones y, a continuacion, todos los valores no nulos junto con su posicion relativa. Para numerar las posiciones supondremos que se comienza en el primer elemento (1,1) y se recorre la matriz por columnas. Para almacenar de forma permanente la matriz se puede utilizar un fichero de texto.


MATRIZ_________________fichero_____________significado                    
[3.6__0___0___0___0 ] _____  4      5 ________ matriz de 4 filas y 5 columnas
[ 0___0___0___0___0 ] _____  1   3.6 _______ en posicion 1( fila 1, columna 1) valor 3.6
[ 0___0___0___0_-3.0] _____ 12  6.7 _______ en posicion 12( fila 4, columna 3) valor 6.7
[ 0___0__6.7__0___0 ] _____ 19  -3.0 _____ en posicion 19( fila 3, columna 4) valor -3.0

Se pide desarrollar en PASCAL estandar los siguientes procedimientos (previamente se realizaran todas las declaraciones de los tipos de datos que sean necesarias)

procedure SumasMatricesFtxt(var f1, f2, fSuma : tpMatrizFtxt);

{devuelve en fSuma la suma de las matrices (de igual dimension) almacenadas, de forma condensada, en los ficheros de texto f1 y f2. Los elementos estan ordenados por posicion}

Para probar el funcionamiento de estos procedimientos se realizara un programa de prueba en Pascal.

procedure MostrarMatrizFtxt( var f: tpMatrizFtxt);

{ muestra por pantalla (por filas) la matriz almacenada, de forma condensada, en el fichero de texto f. Los elementos estan ordenados por posicion }