Question

Помогите пожалуйста!!! Задан двумерный массив В(5, 5), заполненный случайными числами из промежутка [-9,9]. Найти и вывести на экран те элементы массива, которые больше заданного k. Паскаль

Answer 1

const

 n=5;

var

 b: array [1..n,1..n] of integer;

 i,j,k:integer;

begin

 for i:=1 to n do

   begin

     for j:=1 to n do

       begin

         b[i,j]:=random(19)-9;

         write(b[i,j]:3);

       end;

     writeln;

   end;

 write('Введите k: '); readln(k);

 for i:=1 to n do

   for j:=1 to n do

     if b[i,j]>k then

       writeln('[',i,',',j,']',b[i,j]);

end.

Если моё решение вам помогло, отметьте его как лучшее. Спасибо! Удачи!

Answer 2

Решение задачи на Паскале:

Для решения данной задачи на Паскале, мы можем использовать двойной цикл для обхода всех элементов массива и вывода на экран тех, которые больше заданного числа k.

program ArrayElements;
const
  N = 5;
var
  V: array[1..N, 1..N] of integer;
  i, j, k: integer;
begin
  randomize;
  k := 3; // Пример заданного числа k
  for i := 1 to N do
  begin
    for j := 1 to N do
    begin
      V[i, j] := random(19) - 9; // Заполняем массив случайными числами из промежутка [-9,9]
      if V[i, j] > k then
        writeln('Элемент V[', i, ',', j, '] = ', V[i, j], ' больше ', k);
    end;
  end;
end.

В этом примере мы создаем двумерный массив V(5, 5) и заполняем его случайными числами из промежутка [-9,9]. Затем мы проходим по всем элементам массива и выводим на экран те, которые больше заданного числа k (в данном случае k = 3).

Надеюсь, это поможет вам решить задачу! Если у вас есть еще вопросы или нужна дополнительная помощь, не стесняйтесь спрашивать.