С клавиатуры запрашивается любое целое число,а затем компьютер печатает таблицу умножения этого числа на числа от 1 до 10.
Написать программу на языке Паскаль.

var

 x, i: longint;

begin

   read(x);

   for i := 1 to 10 do

       write(x * i, ' ');

   writeln;

end.

-------------------------

Файл с решением прикреплён.