Дана матрица размером 3*4. найти сумму элементов матрицы. в паскале. обязательно использовать функцию или процедуру

Var c: integer; procedure generate(var c: integer); var ar: array[1..3,1..4] of integer; a,b: integer; begin; for a: =1 to 3 do begin; writeln; for b: =1 to 4 do begin; ar[a,b]: =random(10); c+=ar[a,b]; write(ar[a,b]: 4); end; end; end; begin; randomize; writeln('matrix: '); generate(c); writeln; writeln('result',c); end.

#include < iostream> #include < math.h> using namespace std; void main() { float p, a, b, c,  l, m, h, r_op, r_vp; cout < < "a="; cin> > a; cout < < "b="; cin> > b; cout < < "c="; cin> > c; p=(a+b+c)/2; //найдём полупериметр h=(2/a)*sqrt(p*(p-a)*(p-b)*(p-c)); // найдём длину высоты треугольника m=(1/2)*sqrt(2*a*a+2*b*b-c*c); //найдём длину медианы треугольника l=(2*sqrt(a*b*p*(p-/(a+b); // найдём длину биссектрисы треугольника r_op=(a*b*c)/(4*sqrt(p*(p-a)*(p-b)*(p-; // найдём радиус описанной окружности треугольника r_vp=-a)*(p-b)*(p-c))/p); // найдёи радиус вписанной окружности в треугольник cout < < "dlina visoti= " < < h < < endl; cout < < "dlina mediani= " < < m < < endl; cout < < "dlina bissektrisi= " < < l < < endl; cout < < "rad.op.okr.= " < < r_op < < endl; cout < < "rad.vp.okr.= " < < r_vp < < endl; system("pause > > void"); }