Tabla de fórmulas de multiplicación de Vb
Para i = 1 a 9
Para j = 1 a I
Imprimir string(Trim(I)); " * "; trim(Str(j) " = " ;
q$ = Trim(Str(i * j))
Si Len(q$) = 1, entonces q$ = " " ampq$
Imprimir q; " ";
Siguiente j
Imprimir
Siguiente yo
Para j = 1 a I
Imprimir string(Trim(I)); " * "; trim(Str(j) " = " ;
q$ = Trim(Str(i * j))
Si Len(q$) = 1, entonces q$ = " " ampq$
Imprimir q; " ";
Siguiente j
Imprimir
Siguiente yo