Question

Здравствуйте, кто разбирается в информатике, прошу помогите !
Две программы, нужно сделать в Паскаль.

Answer 1

Таблица умножения на Pascal:

var i,j:integer;

begin

   for i:=1 to 10 do begin

       for j:=1 to 10 do begin

           write(i*j:4);

       end;

       writeln();

   end;

end.

Таблица квадратов на Pascal:

var i,j:integer;

begin

   for i:=0 to 9 do begin

       for j:=0 to 9 do begin

           write(sqr(i*10+j):6);

       end;

       writeln();

   end;

end.