дан двумерный массив размеров 5х6, определить есть ли в данном массиве элемент равный нулю, на паскале.

Хотите узнать готовый ответ на вопрос дан двумерный массив размеров 5х6, определить есть ли в данном массиве элемент равный нулю, на паскале. и правильно решить домашнее задание по предмету Информатика? Подробное решение смотрите ниже.

Дан двумерный массив размеров 5х6, определить есть ли в данном массиве элемент равный нулю, на паскале.

Какой язык?

Паскаль..

// PascalABC.NET 3.3, сборка 1625 от 17.01.2018
// Внимание! Если программа не работает, обновите версию!

begin
Writeln('*** Исходная матрица ***');
var a:=MatrRandom(5,6,-30,30);
a.Println(4); Writeln(4*a.ColCount*'-');
if a.ElementsByRow.Any(t->t=0) then Writeln('Есть нулевые элементы')
else Writeln('Нет нулевых элементов')
end.

Пример
*** Исходная матрица ***
16 -8 -16 6 24 -9
1 -9 26 30 0 5
7 23 10 3 -15 -4
8 18 -3 -14 -23 18
-6 27 -1 20 18 -25
------------------------
Есть нулевые элементы

Program School;
var
a:array[1..5, 1..6] of integer;
i, j:integer;
fl:boolean;
begin
fl:= false;
for i:= 1 to 5 do
for j:= 1 to 6 do
begin
read(a[i,j]);
if a[i,j] = 0 then
fl := true;
end;
If fl = true then
Writeln('В матрице есть нулевые элементы')
else
Writeln('В матрице нет нулевых элементов');
end.

Пример:
1 2 3 4 5 6
0 1 2 3 4 5
9 4 5 7 8 3
5 8 6 9 9 9
1 2 5 4 2 0
В матрице есть нулевые элементы

Похожие ответы

умоляю решите я тупая не знаю как
умоляю решите я тупая не знаю как