Question

Распечатать в столбик таблицу умножения в Паскале на число n (значение n вводится с клавиатуры; 1

Answer 1

var

  i,b,n : integer;

begin

  readln(n);

  for i := 0 to 9 do

  begin  

      b := i * n;

      writeln(b);

  end;

end.

Вроде так, можешь проверить сам

Вариант с untill :

var

 i,b,n : integer;

begin

 i := 0;

 readln(n);

 repeat  

   b := i * n;

   writeln(b);

   i := i + 1;

 until (i = 10)

end.

Answer 2

Конечно, я могу помочь с этим! Вот пример кода на языке Pascal, который создает таблицу умножения для заданного числа n:

pascalCopy code
program MultiplicationTable;
var
  n, i: integer;
begin
  writeln('Введите число n:');
  readln(n);

  writeln('Таблица умножения на ', n, ':');
  for i := 1 to 10 do
    writeln(i, ' * ', n, ' = ', i * n);
end.

Скопируйте этот код в среду разработки Pascal (например, Free Pascal) и выполните его. Программа запросит вас ввести число n, а затем выведет таблицу умножения для этого числа до 10.