lfuzzal
1

Двумерный массив: Определить, количество прямоугольников, составленных из единиц

03.05.2013, 12:28. Показов 1928. Ответов 1
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Есть квадрат NxN, заполненный нулями или единицами. Определить, количество
прямоугольников, составленных из единиц.
Помогите решить , нужная блок схема ( или же просто сам код)
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
03.05.2013, 12:28
Ответы с готовыми решениями:

Заполнить двумерный массив расположив заданное количество единиц случайным образом
Ребята , nомогите додумать , есть двумерный динамический массив , заnолняется рандомно цыфрами 0 и...

В двумерный массив вставить строку из единиц после строки ,в которых количество четных чисел равно 2
Помогите решить) В двумерный массив вставить строку из единиц после строки ,в которых количество...

Подсчитать количество прямоугольников из единиц в матрице
На снимке из космоса были обнаружены прямоугольные объекты. Необходимо подсчитать их количество....

Определить количество единиц в цифровой записи числа, кроме единиц в младших разрядах
Ребят,помогите,срочно надо! Сам что-то не понимаю( Дано натуральное число N. Определить...

1
168 / 90 / 80
Регистрация: 07.10.2012
Сообщений: 145
03.05.2013, 13:53 2
Лучший ответ Сообщение было отмечено как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
var
    n, m, i, j, x, y, x1, y1, ans :longint;
    a :array[1 .. 100, 1 .. 100] of longint;
begin
    readln(n);
 
    for i := 1 to n do
        for j := 1 to n do begin
            read(a[i][j]);
            a[i][j] := a[i - 1][j] + a[i][j - 1] + a[i][j] - a[i - 1][j - 1];
        end;
 
    for x := 1 to n do
        for y := 1 to n do
            for x1 := x to n do
                for y1 := y to n do
                    if ((x1 - x + 1) * (y1 - y + 1) = + a[x1][y1] 
                                                      - a[x1][y - 1] 
                                                      - a[x - 1][y1] 
                                                      + a[x - 1][y - 1]) then inc(ans);
 
    writeln(ans);
 
end.
1
03.05.2013, 13:53
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
03.05.2013, 13:53
Помогаю со студенческими работами здесь

Двумерный массив. Определить количество выиграшей и количество проигрышей
Дан двумерный массив из двух строк и двадцати двух столбцов. В его первой строке записано...

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

Дан массив A[7,7]. Найти количество столбцов, составленных из попарно различных элементов
Дан массив A. Найти количество столбцов, составленных из попарно различных элементов.

Массив: Определить самое большое количество подряд идущих единиц и вернуть индексы начала и конца этого диапазона
Дан массив, состоящий только из 0 и 1. Определить самое большое количество подряд идущих единиц и...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru