Question

Напечатать таблицу умножения на 5 через паскаль.

Answer 1

program multiplication;
var i : byte;
begin   
for i:=1 to 10 do        
 writeln('5*',i,'=',5*i);
end.

Answer 2

var n,i:int64;
begin
writeln('До какого числа');
read(n);
for i:=1 to n do begin
   writeln('5*',i,'=',5*i);
   end;
end.