Программирование паскаль. проверить, все ли строки матрицы a(n×m) содержат хотя бы один отрицательный элемент, если не все, сообщить номер первой, где нет отрицательных элементов. без цикла for, только while или repeat из этого всего мне только нужен сам код(алгоритм) поиска первой строки(если она есть т.к. перед этим надо еще проверить не во всех ли строках содержатся отриц. элементов), где нет отрицательных элементов. ъ желательно написать только две процедуры( т.е. тут будет две процедуры, сначала которая проверяет на наличие отриц. элементов и выдает нам значение flag = true или false, а другая процедурa для нахождения номера первой строки без отриц элем., которая будет выполняться только в том случае, если flag = false ( к примеру)) можете предложить ваш вариант решения

Программа:
const
  n = 5;
  m = 5;
 
var
  a: array[1..n, 1..m] of integer;
  i, j: integer;
 
function check(i: integer): boolean;
var j: integer;
begin
  check := false;
  j := 0;
  repeat
    inc(j);
    if a[i, j] < 0 then
    begin
      check := true;
      exit;
    end;
  until j = m;
end;
 
function search: integer;
var i: integer;
begin
  search := 0;
  i := 0;
  repeat
    inc(i);
    if not(check(i)) then
    begin
      search := i;
      exit;
    end;
  until i = n;
end;
 
begin
  writeln('Введите матрицу ', n, 'x', m,': ');
  i := 0;
  repeat
    j := 0;
    inc(i);
    repeat
      inc(j);
      read(a[i, j]);
    until j = m;
  until i = n;
  writeln('ответ: ', search);
end.
Пример работы программы:
Введите матрицу 5x5:
3 4 2 3 -2
3 -5 -7 -2 1
8 2 5 4 -4
0 1 2 3 4
1 7 2 -5 2
ответ: 4
* Примечание: Если во всех строках есть отрицательные элементы, то ответ будет 0 (можно изменить в самой процедуре)

1. Укажіть всі цілі від’ємні числа, що більші за -4,7 .

А) -3,-2,-1; В) -5, -4,-3, -2,-1;

Б) -4,-3,-2,-1,0; Г) -4,-3,-2,-1.

2. Сума двох чисел 25 і одне з них у 5 разів менше за інше. Яка із систем відповідає умові

задачі, якщо менше число позначили через х, а більше – через у?

А) В)

Б) Г)

3.При якому значенні т значення виразу 4-2т дорівнює 7?

А) -1,5; Б) -10; В) 1,5; Г) -5,5.

4. Розв’яжіть рівняння х2 +9х=0

А) 0; Б) -9; В) -9; 0; Г) 0; 9.

5.При якому значенні змінної х дріб не має змісту?

А) 2; Б) -2,4; В) -4; Г) -2.

6. Серед наведених систем укажіть таку, що не має розв’язків

А В)

Б) Г)

7. Чому дорівнює сума та добуток коренів квадратного рівняння х2- 8х +15 = 0;

8.Складіть квадратне рівняння, корені якого дорівнюють 2 - та 2 + .

9.Розв’яжіть систему рівнянь:

10. Розвяжіть рівняння: -у4 -5у2 +36 =0

ІІ рівень

ІІІ рівень

Объяснение:

Надо установить 32-bit java и всё заработает. Я так сделал и всё. Я ввожу правильный (:11111) адрес сервера. Q: Я не могу двигаться при входе в игру, что делать?. зайти - ввожу ke. org:12317 и сначало долго висит надпись Вход и после этого - Подключение. Здравствуйте! Я установил последнюю версию Minecraft совсем недавно. Но я не могу. Никак! Делайте пароли запоминаемые и не очень большие. Когда я играю на серверах с мини-играми, они долго грузятся. 2.1 Загрузка и запуск игры; 2.2 Вход в игру; 2.3 Управление и интерфейс. После объединения аккаунта Minecraft с общим аккаунтом.