Pascal/Turbo Pascal - Entrada sin espacios

 
Vista:

Entrada sin espacios

Publicado por Mikaela (1 intervención) el 13/09/2017 16:32:22
Buenas,
Tengo una tarea en la cual la entrada debe ser colocada de la siguiente manera 16:1244.
O sea, un número (del 2 al 16), dos puntos, otro número de hasta 7 dígitos, y un punto nuevamente. Todo eso sin colocar ningún espacio entre un carácter y otro. El problema es que tengo que usar el compilador de Free Pascal y este no hace lecturas mixtas, por lo tanto colocar

1
2
3
4
5
Var
        Base, num : integer;
        Car1, car2 : char;
Begin
        Readln (base, car1, num, car2);

Por ejemplo, no me sirve. He intentado de todo, pero no he conseguido darme cuenta en qué me equivoco. Quizá es algo obvio, pero no pude solucionarlo.

Agradecería cualquier ayuda.

No puedo usar "facilidades" del tipo array y string, porque es algo que aún no se dio en el curso.

Uso el compilador en linux.

Gracias.
Slds,
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
sin imagen de perfil
Val: 287
Oro
Ha mantenido su posición en Pascal/Turbo Pascal (en relación al último mes)
Gráfica de Pascal/Turbo Pascal

Entrada sin espacios

Publicado por dario (38 intervenciones) el 14/09/2017 05:27:08
Puedes leer los numeros, luego conviertes los numeros a string, y por ultimo concatenas todo y muestras la salida.
Ejm:

leer(num1,num2)
convertir a string (num1,num2)
concatenar la salida.
imprimir(num1+":"+num2+".")
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar