> > составить программу на паскале. < < сформировать двухмерный массив a[1..10,1..10] случайными значениями в диапазоне [0..20]. создать одномерный массив b[1..10], значения элементов которого равны сумме элементов строк двухмерного массива. массив b вывести на экран. p.s: без наворочек, тип циклы, условия если надо и сами массивы. : c

Const n=10; var  a: array[1..n,1..n] of integer; b: array[1..n] of integer; i,j,s: integer; begin randomize; writeln('исходный массив: '); for i: =1 to n do   begin   for j: =1 to n do   begin   a[i,j]: =random(21);   write(a[i,j]: 4);   end;   writeln;   end; for i: =1 to n do   begin   s: =0;   for j: =1 to n do s: =s+a[i,j];   b[i]: =s;   end; writeln('полученный массив: '); for i: =1 to n do write(b[i]: 4); writeln;   end. пример: исходный массив:     8  12  16  16  19  15  11  11  13    7     7    3  20    3  13    2  20  18    9    2   18  11  17    0    4    0  18    3  17  12   12    9  18    9  18    4    7  15    4  20   17  12  13  20  12  20    4  10  16  18   15  19    2    1  18  20  13    1  19    3   12    7    8  13    3    3  15  13    2  15   15    0  20    9  20  14    3  19    6  20   12    4  19    0  19    2  18    4  12  10     3    7    5  15  15    3  19    9  10    8 полученный массив:   128  97 100 116 142 111  91 126 100  94

Вихідні дані:

Обсяг спожитої електроенергії за розрахунковий період (календарний місяць) – 196 кВт*год.

Тарифи на електричну енергію:

І блок (до 100 кВт∙год. (включно)) – 36,6 коп./кВт∙год;

ІІ блок (понад 100 кВт∙год. до 600 кВт∙год. (включно)) - 63 коп./кВт∙год;

ІІІ блок (понад 600 кВт∙год.) – 140,7 коп./кВт∙год

Вартість спожитої електроенергії за розрахунковий період (календарний місяць) з ПДВ:

100 × 0,366 + 96× 0,63 = 97,08 грн.

За наявності пільги - 50% при нормі пільгового споживання на місяць – 90 кВт*год. розрахунок буде наступним:

вартість обсягу електроенергії в межах І блоку з врахуванням пільги:

90×0,366×0,5 + 10×0,366 + = 20,13 грн;

вартість обсягу електроенергії в межах ІІ блоку:

96×0,63 = 60,48 грн.

Вартість спожитої електроенергії за розрахунковий період (календарний місяць) з ПДВ:

20,13 + 60,48 = 80,61 грн.