[ Foro de Pascal ]

multiplicación de secuencia de números

08-Jun-2020 01:23
yam esp
2 Respuestas

hola! como están? tengo este ejercicio en Pascal y mi duda empieza cuándo tengo que multiplicar los números de una secuencia:
Realice un programa que lea 10 pares de números (X,Y) e informe, para cada par de números, la suma y el
producto de todos los números entre X e Y.
Por ejemplo, dado el par (3,6), debe informar:
“La suma es 18“ (obtenido de calcular 3+4+5+6)
“El producto es 360“ (obtenido de calcular 3*4*5*6)

y este es el código que estoy haciendo:

program practica;
procedure suma(n1: integer;n2:integer;var sum:integer);
var i:integer;
begin
sum:=0;
for i:=n1 to n2 do begin
sum:=sum+i;
end;
end;

procedure producto (n1:integer;n2:integer;var prod:integer);
var i:integer;
begin
for i:=n1 to n2 do begin
prod:=i*n2;
end;
end;

var n1,n2,sum,prod,i:integer;
begin
for i:=1 to 3 do begin
readln(n1,n2);
suma(n1,n2,sum);
producto(n1,n2,prod);
writeln('La suma de los números entre ',n1,' y ',n2,' es: ',sum);
writeln('La multiplicacion de los números entre ',n1,' y ',n2,' es: ',prod);
end;
readln;
end.


08-Jun-2020 01:43
Nacho Cabanes (+83)

El planteamiento del producto es muy similar al de la suma, pero el valor inicial no será 0, sino 1. A partir de ahí, multiplicas cada vez por su valor anterior.


08-Jun-2020 03:40
yam esp

mil gracias Nacho genio! ya lo solucione, es que recién estoy entrando a este mundo y desconozco muchísimo todo, así que los voy a contactar seguido. abrazo!






(No se puede continuar esta discusión porque tiene más de dos meses de antigüedad. Si tienes dudas parecidas, abre un nuevo hilo.)