Помогите решить задачу, на Delfi!

[имт]

1)Найти сумму элементов массива, больших данного числа А (А вводится с
клавиатуры).
2)Задан двухмерный массив целых чисел A размером N на M. Найти
число элементов A[i,j] < T и произведение этих элементов
3)Найти разность суммы элементов двух заданных двухмерных массивов
и их произведение. Определить, что больше.
Заранее спасибо большое!

[Oleg_Rus]

1. Для начала можно посмотреть раздел "Алгоритмы".
2. Решение ваших задач (пишу навскидку, возможны некоторые ошибки)
2.1. for i:=1 to n do
if (mass>a) then sum:= sum+mass;
2.2. count:=0;
p:=1;
for i:=1 to n do
for j:=1 to m do
if (a[i, j]<t) then begin
count++;
p:=p*a[i, j];
2.3. for i:=1 to n1 do
for j:=1 to m1 do
s1:= s1+a[i, j];
for i:=1 to n2 do
for j:=1 to m2 do
s2:= s2+a[i, j];
if (s1>s2) then raznost:=s1-s2 else raznost:=s2-s1;