Question

Срочно!!!! Вывести на экран таблицу умножения на N, N вводит пользователь (это число от 0 до 10, если пользователь введет что-то другое - сообщить об ошибке).
Все в паскале

Answer 1

Программа:

Pascal:

var

 N, i, k: integer;

begin

 write('N = '); readln(N);

 if (N >= 0) and (N <= 10) then begin

   for i := 1 to N do begin

     for k := 1 to N do

       write((i * k) :3);

     writeln;

   end;

 end

 else writeln('Ошибка');

end.