Plantee e implemente un programa en PASCAL que muestre por pantalla la
tabla de multiplicar (0-10) de un número entero positivo introducido por el
teclado. Muestre la salida en un formato similar al indicado en el ejercicio
anterior.
PROGRAM tabla110(input,output);
(*Programa que pida un numero del 1-10 por pantalla y saque la tabla de multiplicar de dicho numero*)
VAR
n:integer;
multiplicacion:integer;
I:integer;
BEGIN
writeln('Escriba un numero del 1 al 10 para mostrar su tabla de multiplicar');
read(n);
writeln('Tabla del ',n,'');
FOR I:=0 TO 10 DO
BEGIN
multiplicacion:=n*I;
writeln('',I,'*',n,'=',multiplicacion,'');
END;
END.
Ejemplo de ejecución
Suscribirse a:
Enviar comentarios (Atom)
No hay comentarios:
Publicar un comentario