ayuda con código for-to
Publicado por Mei (1 intervención) el 21/04/2023 22:57:51
Buenas tardes comunidad, tengo una duda con este código ya que no se como hacer que me imprima los resultados en una misma linea luego de la secuencia for-to:
Escriba un programa que reciba un número entero N ingresado por el usuario y una secuencia de N
pares de números enteros, y muestre por pantalla la suma de cada par leído.
Por ejemplo, si N es 5 y la secuencia leída es: 0 3 8 6 9 2 3 3 1 -1
La salida debe ser: 3 14 11 6 0
este es el código que escribí:
program sumar_pares;
var
num, i, a,b,suma: integer;
begin
write('Ingrese cantidad de secuencias: ');
readln(num);
for i:= 1 to num do
begin
write ('Ingrese dos numeros para la secuencia ',i,': ');
readln(a,b);
suma := (a+b);
end;
writeln (suma);
readln;
end.
El problema es que los resultados los imprime al final de cada secuencia y yo necesito que queden todos en una misma linea al final, pero no se como hacer que se guarden los resultados para después mostrarlos.
Escriba un programa que reciba un número entero N ingresado por el usuario y una secuencia de N
pares de números enteros, y muestre por pantalla la suma de cada par leído.
Por ejemplo, si N es 5 y la secuencia leída es: 0 3 8 6 9 2 3 3 1 -1
La salida debe ser: 3 14 11 6 0
este es el código que escribí:
program sumar_pares;
var
num, i, a,b,suma: integer;
begin
write('Ingrese cantidad de secuencias: ');
readln(num);
for i:= 1 to num do
begin
write ('Ingrese dos numeros para la secuencia ',i,': ');
readln(a,b);
suma := (a+b);
end;
writeln (suma);
readln;
end.
El problema es que los resultados los imprime al final de cada secuencia y yo necesito que queden todos en una misma linea al final, pero no se como hacer que se guarden los resultados para después mostrarlos.
Valora esta pregunta
0