Question

write a program that will input a number,then display the first 10 multiples of that number.

Answer 1

Answer on Question#40035 – Programming – Delphi | Pascal

program question40035;
const c = 10;
var i,n: integer;
begin
writeln('Please enter number:');
readln(n);
for i:= 1 to c do
begin
writeln(inttostr(n), ' * ', inttostr(i), ' = ', inttostr(n*i));
end;
readln;
end.