я вот тут попробовала сделать, только не знаю куда вместить ограничения Program matriza; const m=5; n=5; Var a: array[1..5,1..5] of real; i,j: integer; begin Randomize; for i:=1 to m do begin for j:=1 to n do begin a[i,j]:=i+0.5/j+sin(j); Write(a[i,j]:5); end; writeln; end; readln; end.
какие ограничения? да и вообще тут написан первый вариант заполнения в зависимости от значения индекса, функция randomize тут абсолютно бесполезно, еще и с ошибками написано заполнение по сравнению с формулой:
Code
a[i,j]:=i+0.5/j+sin(j);
приоритет операций никто не отменял If you can't make it GOOD make it LOOK GOOD. B.Gates
ну ограничения можно поставить для чисел которые будет возвращать генератор, но вообще генератор возвращает целые числа. самый простой способ получать действительные это например генерировать числа в каком то большом диапазоне например от 100 до 1000 и полученный результат делить на 100 - тогда будем получать действительные числа от 1 до 10... но правда тогда надо будет сгененрировать много чисел чтобы получилась картина нормального распределения. If you can't make it GOOD make it LOOK GOOD. B.Gates