Preguntas con la etiqueta [pascal]
Pascal es un lenguaje imperativo creado por Niklaus Wirth en 1969. Fue ampliamente usado en enseñanza y desarrollos en las décadas de 1970 y 1980.
100
preguntas
0
votos
0
respuestas
14
vistas
No se muestra la pantalla de respuesta en Lazarus
Estoy intentando hacer un Hola mundo en código pascal, en el lazarus. Me compila bien, pero no me aparece la pantalla de respuesta. ¿Qué puede ser?
Aquí les dejo el código.
Program HolaMundo;
begin
...
0
votos
0
respuestas
25
vistas
Duda comprobación while Pascal
Tengo un problema con Pascal. Estoy creando una base de datos de personas, con la función NUEVO de crear registro tiene que verificar que el nº de documento introducido no se encuentre ya en la base ...
1
voto
1
respuesta
32
vistas
Programa en Pascal no toma un archivo y trabaja con datos distintos a los proporcionados
Tengo un programa en Pascal y requiero que tome un archivo en concreto, no lo toma y trabaja con datos distintos a los proporcionados.
El archivo a usar es el siguiente:
1000000005|1000000005|...
1
voto
1
respuesta
12
vistas
Mal calculo de maximos (codigo de las 10 ciudades con mas cantidad de clientes). En pascal
Estoy teniendo inconveniente al momento de calcular los codigos de las 10 ciudades con mayor cantidad de clientes. (SOLO DEBO UTILIZAR VECTORES)
En este programa utilizo varios vectores.
vClientes: ...
0
votos
0
respuestas
14
vistas
Intercambio filas por columnas - PAscal
Os pido ayuda de nuevo con un ejercicio: se trata de intercambiar filas por columnas en un array.
Es un array de 7 filas y 3 columnas con letras aleatorias de la "A" a la "U". Sale ...
2
votos
2
respuestas
40
vistas
Random letras sin repetir
Necesito ayuda para crear un programa que genere un random de letras (de la A a la U) y que no se repitan. Deben aparecer en un formato de de 3 columnas y 7 filas, aunque lo que más me interesa ahora ...
1
voto
0
respuestas
29
vistas
Problema con contador Pascal
Necesito ayuda con un proyecto de Pascal. Se crea un programa que es un juego, se genera un texto aleatorio de 4 letras y el usuario tiene que intentar adivinarlas.
Tiene que salir un contador de las ...
0
votos
1
respuesta
73
vistas
Como hacer una matriz en pascal con filas y columnas que decide el usuario?
Has ahora este es mi avance pero me da error ...
program matriz;
uses crt;
var
filas, columnas : integer;
esCuadrada : boolean;
procedure Encabezado();
begin
clrscr;
write('...
1
voto
1
respuesta
46
vistas
Pascal: Error al calcular dos maximos
Estoy teniendo inconvenientes al momento de calcular los dos máximos en Pascal.
El inconveniente me pasa solo en el primer máximo (max1), ya que el segundo máximo (max2) me lo retorna correctamente.
...
1
voto
1
respuesta
28
vistas
Error "Floating Point Error" en cálculo recursivo
estoy tratando de calcular de forma recursiva los elementos de una matriz de MxN. Al intentar dividir cada elemento de MxN da error de Floating Point Error.
function promMatRec(mNum:mat1;n,m,mMax:byte)...
2
votos
1
respuesta
7
vistas
Conflicto con el procedimiento Read al manipular ficheros .dat en Firemonkey
Tengo un problema a la hora de manipular fichero .dat en el programa que estoy haciendo.
Crear el fichero y guardar información en él no me da problemas.
El problema surge cuando intento leerlo y ...
2
votos
1
respuesta
49
vistas
copiar imagen canvas delphi fmx
Queria consultar cual es procedimiento equivalente en Firemonkey al
metodo (Copyrect o StretchDraw) del canvas de la VCL.
He utilizado copybitmap, pero no logro copiar la imagen al formulario.
Canvas....
1
voto
1
respuesta
20
vistas
¿cómo insertar 3 vectores en una matriz?
Necesito ingresar 3 vectores en una matriz. Me quede en la function "cargar" para insertar los vectores. Pero no se de que manera hacerlo.
A continuación mi código:
program ejer51;
uses crt;
...
3
votos
4
respuestas
161
vistas
¿Cómo se ejecuta un if cuando se usa con una clausula AND?
SI tengo esta condición:
IF (("Condicion Uno") and ("Condicion Dos"))
Si la "Condicion Uno" es falsa, el operador AND se fija también en la "Condicion Dos" o ...
1
voto
1
respuesta
48
vistas
¿Que ocurre si no asigno un valor a una variable y lo imprimo?
Se que puede sonar como una pregunta muy basica/tonta. Pero para poner un ejemplo en Pascal,
Program prueba ;
var
a : integer ;
begin
write(a) ;
end.
Por ejemplo si me preguntaran que imprime en ...
1
voto
1
respuesta
85
vistas
Traducir un código en C++ a Pascal
¡Hola! Si me pueden ayudar a pasar este código que está en C a Dev-pascal. He estado trantando de pasar el código a Pascal, aunque he visto algunas similitudes entre los lenguajes, no logro pasarlo ...
4
votos
2
respuestas
41
vistas
Buscar los factores primos de un vector con x elementos
El ejercicio me pide: ingresar una cantidad x de números naturales mayores que uno y mostrar en pantalla la descomposición en factores primos de cada uno, indicar cual de ellos tiene más factores ...
3
votos
1
respuesta
30
vistas
Cómo puedo contar la cantidad de columnas qe están ordenadas ascendente de una matriz . Estoy utilizando pascal
procedure ascendentes(n,m: byte ; mat: tipomat);
var
i,j,suma: byte ;
begin
suma:=0;
i:=2;
for j:=1 to m do
begin
while (i<=n) and (mat[i,j]>mat[i-1,j]) do
...
2
votos
1
respuesta
99
vistas
¿Cómo puedo validar un edit. en Delphi 4?
Hola amigos ¿Cómo puedo validar un edit en Delphi 5 para que no me deje digitar acentos cuando pego la información dentro del edit?
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
...
2
votos
1
respuesta
37
vistas
Programa en Pascal no acepta la condicion de finalizacion para while
Tengo como consigna realizar un programa que tome datos de un producto y genere una lista hasta que se ingrese el producto cuyo codigo sea "-1". Ahora, el problema es que al ejecutar el ...
0
votos
0
respuestas
49
vistas
Estoy con programa en pascal y no me sale
[
Es el problema a resolver, tengo que poner un numero mayor a 100 y que me diga todos los numeros que cumplan la propiedad en donde se repitan 2 digitos. Hasta ahora hice lo que ven, pero nose que ...
0
votos
2
respuestas
292
vistas
LENGUAJE PASCAL A LENGUAJE C
Escribir un programa en C, que escriba los números comprendidos entre 1 y 100. El programa
escribirá en la pantalla los números en grupos de 20, solicitando al usuario si quiere o no
continuar ...
1
voto
2
respuestas
78
vistas
¿Cómo evitar que mi antivirus borre los ejecutables de Delphi? ¿Cómo evitarlo?
Hola a todos.
Actualmente cuento con una problemática que es bastante fastidiosa, mi antivirus (McAfee LiveSafe) esta interfiriendo con delphi (version 10.4), me borra los ejecutables de mis ...
3
votos
1
respuesta
147
vistas
Problema con la suma de dos números decimales V10.4
El problema es el siguiente, actualmente estoy desarrollando una aplicación de consola la cual sume dos números decimales (Números de tipo double), estos números son recibidos por teclado. Pero al ...
2
votos
1
respuesta
42
vistas
Mi codigo no compila
estoy con un proyecto de pascal y la idea es que el programa pueda aceptar pagos de tres productos distintos pero no logro compilarlo, hay tres variantes, costo del agua que son 7$ costo de ...
0
votos
1
respuesta
42
vistas
¿Por qué me aparece este error en Delphi? En ButtonDot.Caption
Este es el código:
procedure TForm1.ButtonDotClick(Sender: TObject);
begin
if (POS('.', txtResult.Text))<>0 then
exit
else
txtResult.Text := txtResult.Text + ButtonDot.Caption;
end;
El ...
1
voto
1
respuesta
27
vistas
¿Por qué me aparece este error? No puedo escribir un String con un TEdit en Delphi
¿Alguien puede ayudarme?
procedure TForm1.ButtonPlusLessClick(Sender: TObject);
var
pMinus: Real;
begin
pMinus := StrToFloat(txtResult.Text);
txtResult := FloatToStr(-1 * pMinus);
end;
El error ...
2
votos
1
respuesta
42
vistas
como puedo intercambiar la posición de palabra en Delphi 10
Hola muchachos soy nuevo en el lenguaje de programación Delphi10 y no se como empezar a realizar este ejercicio, les agradezco quien me puede explicar la elaboración del ejercicio.
¿Cómo puedo cambiar ...
0
votos
0
respuestas
29
vistas
Constructor en pascal
Al llamar a "establecerNombre" me sale error y no sé como solocionarlo:
constructor create(n:String; ins:cadenas; rit:String; arts:cadenas; min, max:Integer);
nombre := n;
...
2
votos
0
respuestas
67
vistas
Expresiones lógicas en pascal
while (dd1 <> dd2) or (mm1 <> mm2) or (aa1 <> aa2) do
Cuando pongo este loop en Pascal, solamente compara la primer expresión (dd1 <> dd2), y las otras las pasa por alto, ¿...
0
votos
1
respuesta
110
vistas
¿Cómo hago una recursividad para ver si un número N esta ausente en un número K?
program project1;
{$codepage utf8}
FUNCTION Digito_Aus(nro,nro2:integer):boolean;
begin
IF (nro div 10)=0 then
Digito_Aus:=nro <> nro2
else digito_aus:=false;
end;
var S,k:integer;
...
0
votos
1
respuesta
250
vistas
¿Cómo determinar la posición de un número ingresado en Pascal?
Por ejemplo quiero hacer lo siguiente:
Ingrese un número (0 para salir): 18737
Ingrese el dígito para saber si aparece en 18737: 7
El dígito 7 aparece por primera vez en la posición 0 y la cantidad ...
1
voto
2
respuestas
37
vistas
Datos se borran de un objeto en Delphi
Tengo un objeto declarado de la siguiente forma:
nroRacional = object
private
primerNro:double;
segundoNro:double;
public
procedure cargarDatos(primerDato, ...
0
votos
1
respuesta
51
vistas
Racionales en Delphi
¿Hay alguna función que retorne si un número es o no racional? Necesito hacer operaciones básicas sobre dos números, pero esta la condición de que el número debe de ser racional, y no tengo claro de ...
1
voto
1
respuesta
267
vistas
¿Como ajustar el ancho de columnas de una grilla a su contenido y permitir que se pueda modificar manualmente en Pascal?
Estoy programando en pascal y utilizo Delphi Xe7. Estoy tratando de hacer que el ancho de las columnas de una grilla se ajuste a su contenido, pero que permita modificar el ancho a gusto del usuario....
0
votos
0
respuestas
79
vistas
Problema al intentar ejecutar una consulta SQL desde pascal
tengo la siguiente función, la cual, toma unos cuits desde una grilla y los inserta en una tabla temporal. Estoy usando delphi XE7 y Firebird 2.5.
function TfImportacionArchivoARBARetenPercep....
2
votos
1
respuesta
1k
vistas
¿Como agregar comillas simples (') o dobles (") a una lista de strings en pascal?
Buenos días estoy tratando de armar una consulta para Firebird 2.5. La consulta que busco crear tiene que tener el siguiente formato:
Select *
From Clientes c
Where c.activo = 1 and c.cuit not in (&...
3
votos
2
respuestas
280
vistas
Como quitar [ ] de una cadena en Pascal
estoy renegando con una funcion para quitar [] de una cadena. Necesito quitar los corchetes de una cadena, pero el problema que tengo, es que esos [] pueden estar en cualquier lugar de la cadena.
el ...
1
voto
1
respuesta
448
vistas
¿Cómo guardar registros en pascal? en lazarus
Estoy tratando de guardar un registro en un archivo de texto, pero soy nuevo en Pascal y realmente no entiendo cómo hacer este proceso. Me explico:
Tengo un formulario donde quiero agregar 5 alumnos, ...
1
voto
0
respuestas
108
vistas
programación en pascal function (n: integer): integer
esta función que necesito realizar tiene las siguientes características:
El parámetro n es un natural menor que 1000.
La función retorna el valor siguiente a n, según la descripción de la función ...
1
voto
1
respuesta
169
vistas
¿Una forma mejor de eliminar todas las apariciones de un elemento en una lista?
Tengo un procedimiento que resuelve lo que quiero: recibe una lista y un número n y elimina todas las apariciones de n dentro de la misma.
Sin embargo es bastante horrible el código y quería saber ...
2
votos
2
respuestas
297
vistas
Como Cambiar Icono de mi Aplicacion en 2do Plano Plano en Delphi
Supongamos que tengo una aplicación corriendo en segundo plano pero deseo que, cuando se cumplan ciertas condiciones, su icono cambie y se vea reflejado en el Administrador de Tareas, tal y como lo ...
0
votos
0
respuestas
89
vistas
Error de compilacion en pascal
Me descargue el ide lazarus pero no me esta compilando ningun programa intente con un hola mundo y me salta el siguiente error respecto a un programa que se me abre repentinamente a la hora de ...
1
voto
1
respuesta
132
vistas
Como devolver un string en una función de un Dll escrito en Delphi 10.3
Estoy tratando de crear un DLL en Delphi 10.3 que pueda ser consumido por un programa llamado IFER Field-Map, un software creado en Delphi.
En la documentación oficial del software dice que en el ...
1
voto
2
respuestas
111
vistas
Error al abrir un fichero DELPHI
Estoy tratando de abrir un fichero de un archivo que cree previamente de tipo .dat
Es un registro que contiene otros registros
type mapa = record // record que guarda todo el proyecto
mcM,mcT,mcC,...
1
voto
1
respuesta
1k
vistas
Error 106 en Pascal
Hola estoy resolviendo el siguiente enunciado:
Leer desde un archivo números enteros Calcular y escribir el promedio de los elementos
positivos y distintos de cero que se encuentran entre dos ...
0
votos
0
respuestas
196
vistas
¿Cómo hago un árbol binario de búsqueda de nombres en pascal?
El árbol tiene que estar ordenado por nombre, pero no sé como compararlos para ver si un nombre que quiero agregar es mayor o menor.
0
votos
1
respuesta
805
vistas
Error 103 en Pascal
Me compila el siguiente programa, pero me aparece el error 103. Creo que se refiere a que no se abrió el archivo. ¿Cómo lo puedo solucionar? Pensé que era la dirección del archivo de texto pero al ...
1
voto
1
respuesta
42
vistas
Problema de sintaxis con Pascal
este es mi primer post y soy nuevo en esto de la programacion.
La consigna del problema es la siguiente:
Se conoce el saldo inicial de una cuenta bancaria y una serie de movimientos realizados, por ...
0
votos
1
respuesta
40
vistas
Error con condicional en pascal
el error que tengo en mi programa es el siguiente, quiero crear un programa en el cual el usuario digite numeros del 1 al 7 pero tambien necesito establecer una condicion, la cual es que si el usuario ...