В матрице A(3,5) найти сумму элементов

var a:array [1..3,1..5] of integer;i,j,s:integer;beginrandomize;for i:=1 to 3 do beginfor j:=1 to 5 do begina[i,j]:=random(21)-10;write (a[i,j]:4);end;writeln;end;for i:=1 to 3 dofor j:=1 to 5 dos:=s+a[i,j];writeln (s);readln;end.