Iteración – Ejemplo 4

Enunciado

Calcular e informar los n primeros términos de la progresión geométrica de razón 3. Versión 4: Se utiliza el ciclo repeat y nuevamente el contador i como control de mismo.

Código

Python

def main():
    print( "Progresion geometrica de razon 3 " )
    print( "Geometric progression of ratio 3\n " ) 
    n = int( input( " Cantidad de terminos/Number of terms: " ) )
    
    t = 1
    i = 1
    while True:
        print( "\t", t )
        t *= 3
        i += 1
        if i>n: break

    input( "Presionar/Press Enter to exist " )
main()

C++

#include <iostream>
using namespace std ;
#include <conio.h>

int main()
{
   int n, i ;
   float t ;

   cout << "Progresion geometrica de razon 3" << endl ;
   cout << "Geometric progression of ratio 3" << endl ;	
   cout << "Cantidad de terminos/Number of terms: " ;
   cin >> n ;
   	
   t = 1 ;
   i = 1 ;
   do
   {
   	cout << endl << "\t" << t ;
   	t *= 3 ;
      	i ++ ;
   }
   while ( i<=n ) ;
   	
   cout << endl << "Presionar/Press enter to exit " ;
   getch();
   return 0 ;
}

Pascal

Program  Problema8_1c ;
var
   n, i : 0..50 ;
   t : real ;

begin
   writeln( 'Progresion geometrica de razon 3' ) ;
   writeln( 'Geometric progression of ratio 3 ' ) ;
   writeln ;
   write( 'Cantidad de terminos/Number of terms: ' ) ;
   readln( n ) ;
    
   t :=1 ;
   i := 1 ;
   repeat
       writeln( t:25:0 ) ;
       t := t*3 ;
       i := i+1
   until i>n ;
    
   writeln( 'Presionar/Press Enter to exit' ) ;
   readln ;
end.

Diagramas