Заполните массив 10 на 10 значения выражения M[a,b]=sin(a)+b

vara,b:integer;m:array [1..10,1..10] of real;beginfor a:=1 to 10 do beginfor b:=1 to 10 do begin  m[a,b]:=sin(a)+b;  write('m[a,b]:7:2);end;end;writeln;end.