Question

Задание: написать программу, которая выведет на экран таблицу умножения (через оператор while)(всю), типа: 2*2=4;2*3=6...8*9=72;9*9=81. Язык- Pascal ABC.

Answer 1

Var
    n, i: integer;

begin
    n := 0;
    while (n <= 1) or (n > 10) do
    begin
        write('Введите n в диапазоне от 2 до 10 = ');
        readln(n);
    end;
   
    for i := 1 to 9 do
        writeln(n, ' * ', i, ' = ', n * i);
end.

без проверки

var
    n, i: integer;

begin
    write('Введите n в диапазоне от 2 до 10 = ');
    readln(n);
   
    for i := 1 to 9 do
        writeln(n, ' * ', i, ' = ', n * i);
end.