Página 1 de 1

Tablas de multiplicar. (C++/Pascal/Python/Ruby)

Publicado: 14 Abr 2010, 00:48
por WindHack
Bueno, este principalmente es un código publicado por [Enlace externo eliminado para invitados], en el cual hace una tabla de multiplicar usando el bucle while en C++. Me pareció interesante aunque realmente su uso no es muy funcional, pero divierte un poco.

Dejaré la aplicación original en C++ y pondré unas traducciones que hice a otros lenguajes.

- C++ (Original by Javier)

Código: Seleccionar todo

#include <iostream>
using namespace std;
int main()
{
  int n,t,x=0;
    cout << "Ejemplo: Empezar:2   -  Terminar: 10" <<endl;
    cout << endl << "Numero a Empezar > ";
     cin >> n;
    cout << "Numero a Terminar > ";
     cin >> t;
   while (x<=t){
          cout << n << "x" << x << "=" <<  x*n  <<endl;
          x++;
    }
}
y aquí mis traducciones :D:

- Pascal

Código: Seleccionar todo

program project1;

{$mode objfpc}{$H+}

uses
  {$IFDEF UNIX}{$IFDEF UseCThreads}
  cthreads,
  {$ENDIF}{$ENDIF}
  Classes
  { you can add units after this };

var
N,T:Integer;
X:Integer=0;

{$IFDEF WINDOWS}{$R project1.rc}{$ENDIF}

begin
     Writeln('Ejemplo: Empezar:2 -> Terminar:10');
     Write('Numero a empezar >');
     Readln(N);
     Write('Numero a terminar >');
     Readln(T);
     while X<=T do
           begin
             Write(N,'x',X,'=,x*N,' ');
             Inc(X);
           end;
end.
- Python (Soy novato en él, así que perdonen errores...)

Código: Seleccionar todo

print("Tabla de multiplicar")
X=0
N=input("Introduzca el numero a iniciar > ")
T=input("Introduzca el numero para finalizar > ")
while X <= T:
	print N,"x",X,"=,X*N," "
	X += 1
- Ruby (Ni hablar apenas aprendí hoy, xD)

Código: Seleccionar todo

print 'Tablas de multiplicar'
print 'Introduzca el numero a iniciar > '
Num=gets.chomp
print 'Introduzca el numero para finalizar > '
Ter=gets.chomp
X=0
#Bucles
N=Num.to_i
T=Ter.to_i
while X <= T
	print N,'x',X,'=,N*X,' '
	X += 1
end
Bueno, eso es todo, espero les sirva de algo.

Saludos,

Re: Tablas de multiplicar. (C++/Pascal/Python/Ruby)

Publicado: 23 Abr 2010, 07:22
por yeikel
Gracias por los source code . Felicidades por las "traducciones"

Ahota te falta pasarlo a... VB

Re: Tablas de multiplicar. (C++/Pascal/Python/Ruby)

Publicado: 23 Abr 2010, 17:15
por linkgl
xD veamos hasta cuantos lenguajes podemos llegar a hacer las tablas...

VB6

Código: Seleccionar todo

Function multiplicar(n As Integer, f As Integer)
Dim x As Integer
For x = 0 To f
MsgBox n & "*" & x & "=" & n * x
Next x
End Function
PHP

Código: Seleccionar todo

<?php
if(!isset($_POST['n']))
{
?>
<form action="#" method="post">
  Numero a multiplicar
  <input type="text" name="n">
  Numero para finalizar
  <input type="text" name="f">
  <input type="submit" value="multiplicar">
</form>
<?php
}
else
{
  $f=$_POST['f'];
  $n=$_POST['n'];
  for($i=0;$i<$f+1;$i++)
  {
    $op=$n*$i;
    echo "{$n} x {$i} = {$op} <br />";
  }
}
?>
Javascript

Código: Seleccionar todo

<script type="text/javascript" language="JavaScript">
function multiplicar(n,f)
{
  for(i=0;i<f+1;i++)
  {
    alert(n+"x"+i+"="+n*i);
  }
}

multiplicar(5,10);
</script>
C

Código: Seleccionar todo

#include <stdio.h>

int main()
{
  int n,f,x;
  printf("indique el numero a multiplicar");
  scanf("%d",&n);
  printf("indique el numero a finalizar");
  scanf("%d",&f);
  for(x=0;x<f+1;x++)
  {
    printf("%d * %d = %d \n",n,x,n*x);
    getchar();
  }
  return 0;
}
xD