Ответы на вопрос:
Объяснение надо сделать то что написано на таблице там серьёзно всё написано
program zapoln_mas;
var
i, j, k: integer;
tab: array [1..4, 1..5] of integer;
begin
// блок заполнения массива
for i : = 1 to 4 do
begin
for j : = 1 to 5 do
begin
tab[i, j] : = random(2);
write(tab[i, j]: 3);
end;
writeln();
end;
// блок поиска элементов, удовлетворяющих условию
for i : = 1 to 4 do
for j : = 1 to 5 do
if tab[i, j] = 0 then k : = k + 1;
writeln('найдено элементов: ', k);
end.
Популярно: Информатика
-
ФрискТок27.11.2020 14:27
-
Агентство1020304014.02.2021 17:44
-
lizun1019.03.2023 09:31
-
kairatfylosof28.07.2020 12:45
-
bubininaaas528.06.2020 23:13
-
udalda520udalda20.03.2022 17:24
-
сончикпоня1526.01.2023 16:37
-
ZENsh24.10.2021 23:22
-
sebtetfGек5у04.09.2021 06:49
-
gladchenko7716.05.2020 12:41