Составте программу в pascal которая напечатает таблицу умножения на вводимую цифру например 5 5*1=5 5*2=10 5*3=15 5*4=20 и.т.д

PascalABC.NET 3.4.2, сборка 1863 от 10.11.2018Внимание! Если программа не работает, обновите версию!

begin

 var n := ReadInteger;

 for var i := 1 to 9 do

   $'{n}*{i}={n*i}'.Println

end.

55*1=55*2=105*3=155*4=205*5=255*6=305*7=355*8=405*9=45

Var x,i:integer;
begin
Readln(x);
i:=1;
While i<10 do begin
Writeln(x+'*'+i+'=');
Writeln(x*i);
i:=i+1;
end;
end.