Question

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

Answer 1

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.

Answer 2

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.

5

5*1=5

5*2=10

5*3=15

5*4=20

5*5=25

5*6=30

5*7=35

5*8=40

5*9=45