currupipi999

Sin más datos de los que das, creo que te refieres al típico error 200 (división by zero) Si es así, googleando un poco podrás encontrar un parche para solucionar dicho error. Si no es eso, tendrás que ser más explícito. Ayudaría que pusieras algún...

Echa un vistazo a la siguiente dirección: http://foros.abcdatos.com/viewtopic.php?t=16730

Te propongo la siguiente solución: Const TAMANIO = 5; Type TipoTabla=Array[1..TAMAniO] of integer; var i, j, contador, n : integer; tabla : TipoTabla; begin Writeln('introduzca ',tamaño, 'n£meros enteros'); For i:=1 to tamanio do readln(tabla); for...

Te propongo la siguiente solución: Uses CRT; var auxcad, CADENA, CADENANUEVA : String; I,J : Integer; espacios,que : integer; begin clrscr; k:=0; i:=0; Writeln('Introduzca la cadena: '); readln(cadena); writeln('Nueva longitud: '); readln(J);...

program crea_lineas; (*-- Funciones y procedimientos -- *) procedure linea(carácter:char ;num_caracteres:integer); begin while (num_caracteres > 0) do begin write(carácter); num_caracteres := num_caracteres-1; end; end; (*-- Variables Globales -- *)...

Echa un vistazo a la siguiente página, y si tienes alguna duda vuelve a escribir. Si después de ver la página se aclaró tu duda, por favor, finaliza la pregunta dándole la calificación que creas conveniente....

Se me pasó poner el cálculo de la inversa. Te dejo una dirección en la que encontrarás el código: http://es.answers.yahoo.com/question/index?qid=20060801075534AAkcTn3 Respecto a lo del Write(") ya te dije que lo de la presentación te lo dejaba para...

Uses CRT; const filas = 100; column = 100; Type TipoTabla = Array [1..colum,1..filas] of integer; var tabla : TipoTabla; i,j, fil,col : Integer; Begin Clrscr; Writeln('Introduzca el n£mero de columnas a usar: '); Readln(COL); wRITELN('Introduzca el...

Te propongo la siguiente solución: uses crt; type tregistro=record nombre:string; end; tfichero=file of tregistro; var fmezcla, fmujeres,fhombres:tfichero; registro:tregistro; begin assign(fmujeres,'mujeres.dat'); assign(fhombres,'hombes.dat');...

El problema es que al utilizar read y no readln para leer las variables, no vacías el buffer del teclado y se produce un salto. Esto lo puedes arreglar de varias formas. Una es incluyendo dos readln consecutivos al final del programa. Yo te...