Program ROBOTA6; Const N = 3 ; M = 4 ; Var A: array [ 1.. N, 1.. M ] of integer ; {опис двовимірного масиву NxM} i, j: integer; Begin {блок введення елементів масиву} Writeln (' Введіть значення елементів таблиці :' ); Writeln ; {організація порожнього рядка} For i:= 1to N do {зовнішній цикл} Begin {відкриваюча операторна дужка} For j:= 1 to M do{внутрішній цикл та зчитування елементів масиву} Begin {відкриваюча операторна дужка} Write ( 'А[ ', i , j, '] = '); readln ( A [ i, j ] ); end; {закриваюча операторна дужка} Readln; End; {закриваюча операторна дужка} Writeln; Writeln('Загальний вигляд таблиці до перетворення:'); {блок виведення на екран елементів масиву} Writeln; for i:=1 to N do begin for j:=1 to M do write(A[i, j]:5); writeln; {після роздрукування і-того рядка перейти на новий рядок} end; {блок обробки масиву} writeln('Загальний вид таблиці після перетворення:'); for i:=1 to N do begin for j:=1 to M do if A[i, j]>0 then write (A[i, j]:5) else write(' '); {кількість пробілів 5} writeln; end; Readln; {затримка роботи наступного оператора} end. В двовимірному масиві D[1..5, 1..5] знайти найменший елемент побічної діагоналі.

1):С:\Учеб­ный\Ин­фор­ма­ти­ка\Ко­ди­ро­ва­ние ->
    С:\Учеб­ный\Ин­фор­ма­ти­ка ->
    С:\Учеб­ный ->
    С:\Учеб­ный\Ин­фор­ма­ти­ка ->
    С:\Учеб­ный\Ин­фор­ма­ти­ка\Ко­ди­ро­ва­ние ->
    С:\Учеб­ный\Ин­фор­ма­ти­ка ->
    С:\Учеб­ный ->
Не подходит, т.к. Витя опустился на n уровней, а поднялся на  n+2, что не подходит по условию.
2)С:\Учеб­ный\Ин­фор­ма­ти­ка\Ко­ди­ро­ва­ние -> 
   С:\Учеб­ный\Ин­фор­ма­ти­ка ->
   С:\Учеб­ный ->
   С:\Учеб­ный\Ин­фор­ма­ти­ка -> 
   С:\Учеб­ный\Ин­фор­ма­ти­ка\Про­грам­ми­ро­ва­ние->
   С:\Учеб­ный\Ин­фор­ма­ти­ка\Про­грам­ми­ро­ва­ние\Пас­каль
Не подходит, т.к. Витя спустился на либо на 2 уровня вниз, либо на 3, а поднялся либо на 3, либо на 4 уровня вверх, что не подходит по условию.
3)С:\Учеб­ный\Ин­фор­ма­ти­ка\Ко­ди­ро­ва­ние ->
   С:\Учеб­ный\Ин­фор­ма­ти­ка -> 
   С:\Учеб­ный -> 
   С:\Учеб­ный\Ма­те­ма­ти­ка -> 
   С:\Учеб­ный\Ма­те­ма­ти­ка\Дроби
Подходит. Витя опустился на 2 уровня вниз и поднялся на 2 уровня вверх.
4)С:\Учеб­ный\Ин­фор­ма­ти­ка\Ко­ди­ро­ва­ние -> 
   С:\Учеб­ный\Ин­фор­ма­ти­ка ->
   С:\Учеб­ный ->
   С:\ ->
   С:\Учеб­ный\ ->
   С:\Учеб­ный\Ин­фор­ма­ти­ка
Не подходит, т.к. Витя спустился на 3 уровня вниз, а поднялся на 2, что не подходит по условию.
ответ: 3)

Язык в задании не указан, значит опишу алгоритм.

Объявим переменные нужные, обязательно обнулим переменную count(все переменные целочисленные)

1. Организация заполнения двумерного массива.(Из файла, руками, в исходном коде, как угодно)
2. Первый цикл от 0 до i(кол-во строк массива)
3. Внутри первого цикла еще один цикл от 0 до j(кол-во столбцов)
4. Внутри второго цикла делаем проверку вида
if (mass[i,j] == X) then
   count = count + 1
5. Теперь когда все итерации будут пройдены, переменная count будет содержать значение равное кол-во элементов со значением X
6. Делаем вывод это значения.

7. Вы восхитительны!