Muestra las tablas de multiplicar

¿Has encontrado un error? ¿Tienes la solución? Deja tu correción ;-)

Antes de comentar: Gran parte de los ejercicios propuestos no tienen librerías debido a que Wordpress las eliminó al verlas como etiquetas HTML. Si sabes/tienes/conoces las librerías que hacen falta, déjalo en los comentarios. Y lo mas importante: Todos los ejemplos fueron realizados por estudiante con únicamente conocimiento básico del lenguaje, no de programación.

[pascal]{-Victor De la Rocha}
{-Algoritmia@groups.msn.com}
{-www.myalgorithm.com}
uses
 crt;var
 tabla,numero:integer;
begin
 ClrScr;
  for tabla:=1 to 10 do   begin
    for numero:=1 to 10 do
     begin
      writeln(tabla,' * ',numero,' = ',tabla*numero);
     end;    Writeln;
   end;
 ReadKey;
end.

1 * 1 = 1
1 * 2 = 2
1 * 3 = 3
1 * 4 = 4
1 * 5 = 5
1 * 6 = 6
1 * 7 = 7
1 * 8 = 8
1 * 9 = 9
1 * 10 = 10

2 * 1 = 2
2 * 2 = 4
2 * 3 = 6
2 * 4 = 8
2 * 5 = 10
2 * 6 = 12
2 * 7 = 14
2 * 8 = 16
2 * 9 = 18
2 * 10 = 20

3 * 1 = 3
3 * 2 = 6
3 * 3 = 9
3 * 4 = 12
3 * 5 = 15
3 * 6 = 18
3 * 7 = 21
3 * 8 = 24
3 * 9 = 27
3 * 10 = 30

4 * 1 = 4
4 * 2 = 8
4 * 3 = 12
4 * 4 = 16
4 * 5 = 20
4 * 6 = 24
4 * 7 = 28
4 * 8 = 32
4 * 9 = 36
4 * 10 = 40

5 * 1 = 5
5 * 2 = 10
5 * 3 = 15
5 * 4 = 20
5 * 5 = 25
5 * 6 = 30
5 * 7 = 35
5 * 8 = 40
5 * 9 = 45
5 * 10 = 50

6 * 1 = 6
6 * 2 = 12
6 * 3 = 18
6 * 4 = 24
6 * 5 = 30
6 * 6 = 36
6 * 7 = 42
6 * 8 = 48
6 * 9 = 54
6 * 10 = 60

7 * 1 = 7
7 * 2 = 14
7 * 3 = 21
7 * 4 = 28
7 * 5 = 35
7 * 6 = 42
7 * 7 = 49
7 * 8 = 56
7 * 9 = 63
7 * 10 = 70

8 * 1 = 8
8 * 2 = 16
8 * 3 = 24
8 * 4 = 32
8 * 5 = 40
8 * 6 = 48
8 * 7 = 56
8 * 8 = 64
8 * 9 = 72
8 * 10 = 80

9 * 1 = 9
9 * 2 = 18
9 * 3 = 27
9 * 4 = 36
9 * 5 = 45
9 * 6 = 54
9 * 7 = 63
9 * 8 = 72
9 * 9 = 81
9 * 10 = 90

10 * 1 = 10
10 * 2 = 20
10 * 3 = 30
10 * 4 = 40
10 * 5 = 50
10 * 6 = 60
10 * 7 = 70
10 * 8 = 80
10 * 9 = 90
10 * 10 = 100

80 comentarios en "Muestra las tablas de multiplicar"

camilo

2009-12-07 19:37:04

hey viejo me aclarastes bien la dianamica del ajercicio

Estefania

2010-01-22 00:22:16

es que estoy pidiendo vde 1 al 20 o 30

fabian

2010-03-24 18:48:15

necesito la tabla del 2 al 20 XDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD

fgfdgdg

2010-04-30 20:05:00

no me funconaaaaaaaaa

3m1lc3

2010-05-18 18:14:17

hola necesito la tabla del 16 porfissssss me la pueden decir

Abraham

2010-05-25 04:24:10

program ttm;
uses crt;
var
tabla,numero: integer;
begin
clrscr;
for tabla:= 1 to 10 do
begin
for numero:= 1 to 10 do
begin
writeln (tabla,' * ',numero,' = ',tabla*numero);
end;
readln; <----- cambie esto porque con el writeln no muestra todas las tablas
end;
readkey;
end.