Question

Tabla inmultirii la 3 si la 8 in Pascal

Answer 1

var

 a, b, n: integer;

begin

 writeln('Introduce-ti un numar:');

 readln(n);

 for a := 1 to 10 do

 begin

   write(n);

   write('×');

   write(a);

   write('=');

   write(n * a);

   writeln('');

 end;

 

end.