Script Tabuada

Descrição

Esconder código-fonte

/// Programa que você digita um número e ele lhe mostra a tabuada 
/// Escrito por Alexandre Pina - alexandrehkk@gmail.com
////////////////////////////////////////////////////////////////



Program Tabuada;
 Var n: Integer;
 Begin
  writeln ( 'Digite o numero para ver a tabuada');
  read(n);
  writeln ( '----------------');
  writeln ( '', n*1);
  writeln ( '', n*2);
  writeln ( '', n*3);
  writeln ( '', n*4);
  writeln ( '', n*5);
  writeln ( '', n*6);
  writeln ( '', n*7);
  writeln ( '', n*8);
  writeln ( '', n*9);
  writeln ( '', n*10);
 End.