Дан двумерный массив, который содердит не более 10 строк и 10 столбцов. Найти сумму тех элементов, которые больше элемента стоящего на главной диагонали в данной строке.

input ndim a(n,n)dim b(n)for i=1 to n  for j=1 to n    a(i,j)=int(rnd*100)  next jnext ifor i=1 to n  b(i)=a(i,i)next is=0: f=1for i=1 to n  for j=1 to n    if a(i,j)>b(f) then s=s+a(i,j)  next j  f=f+1next iprint s