Pascal/Turbo Pascal - Porfavor ayuda con programa de pascal,Ciclo FOR

 
Vista:
sin imagen de perfil

Porfavor ayuda con programa de pascal,Ciclo FOR

Publicado por Malic (7 intervenciones) el 03/02/2016 16:51:31
Hola porfavor alguien sería tan amable de ayudarme con este programa de pascal,se lo agradecería mucho.
Calcule para los primeros N terminos(lo introduces tu) lo siguiente:
1+3+5+7...(son numeros impares) y 1*3*5*7...
Ejemplo: si n=3 entonces 1+3+5=9 y 1*3*5=15

Eso dice el problema porfavor ruego que alguien me ayude muchísimas gracias..
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

Porfavor ayuda con programa de pascal,Ciclo FOR

Publicado por David (224 intervenciones) el 03/02/2016 21:27:43
Te propongo la siguiente solución:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Uses CRT;
 
Var
 I,N,MULTI,SUMA, CONT : INTEGEr;
 
begin
  Clrscr;
  Writeln('Introduzca el t‚rmino de la sucesi¢n: ');
  readln(n);
  multi:=1;
  suma:=0;
  For i:= 1 to n do
    begin
      cont:=i*2-1;
      suma:=suma+cont;
      MULTI:=MULTI*cont;
 
    end;
   Writeln(multi);
   writeln(suma);
   readln;
end.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
2
Comentar
sin imagen de perfil

Porfavor ayuda con programa de pascal,Ciclo FOR

Publicado por Malic (7 intervenciones) el 04/02/2016 06:12:42
Muchisimas gracias amigo,de verdad te agradezco mucho ;)
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