Надо решить ** языке Паскаля В массиве из 3 строк 4 столбцов найти и вывести ** экран....

Question

Надо решить на языке Паскаля
В массиве из 3 строк 4 столбцов найти и вывести на экран. 1)Все элементы массива больше 10. 2)Минимальный элемент 2 строки. 3)Сумму элементов каждого столбца. Вывести полученный массив на экран.
Помогите пожалуйста.

Answer 1

Program ar;
Var a:array [1..3] of array [1..4] of integer;
    i, j, min, sum:integer;
begin
  for i:=1 to 3 do
    for j:=1 to 4 do
      read(a[i][j]);
  for i:=1 to 3 do
    for j:=1 to 4 do
      if a[i][j] > 10 then write(a[i][j], ' ');
  writeln;
  min:=a[2][1];
 
  for j:=1 to 4 do
    if a[2][j] < min then min:=a[2][j];
  writeln(min);
  for i:=1 to 3 do
    begin
    sum:=0;
    for j:=1 to 4 do
      sum:=sum + a[i][j];
    write(sum, ' ');
    end;
end.

Comments

СПАСИБО БОЛЬШОЕ !!

---

Не за что)

Answer 2

Я не знаю раьлисчоджтсро