Question

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

Answer 1

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

Answer 2

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.