напишите программу на языке программирования ( или составьте алгоритм), выдающие полную таблицу умножения от 1 до 9.

program 1;
var i,j: byte;
beginwriteln('Таблица умножения');
for i:=1 to 9 do begin
for j:=1 to 9 do
write(i*j:4);
writeln;
end;readln;
end.