Hola,
Tengo que hacer un programa que solicita al usuario X números y éstes sean multiplicados por un número que también introduce el usuario.
Esto es lo que tengo hecho:
program multi;
var
cadena: string[10];
i: integer;
multiplicador: integer;
begin
writeln('Introduzca una cadena de maximo diez caracteres');
readln(cadena);
writeln('Introduzca un multiplicador');
readln(multiplicador);
for i := 1 to Length(cadena) do
writeln((cadena),' x:',(multiplicador),' =',((multiplicador * cadena));
readln();
end.
Tengo que hacer un programa que solicita al usuario X números y éstes sean multiplicados por un número que también introduce el usuario.
Esto es lo que tengo hecho:
program multi;
var
cadena: string[10];
i: integer;
multiplicador: integer;
begin
writeln('Introduzca una cadena de maximo diez caracteres');
readln(cadena);
writeln('Introduzca un multiplicador');
readln(multiplicador);
for i := 1 to Length(cadena) do
writeln((cadena),' x:',(multiplicador),' =',((multiplicador * cadena));
readln();
end.