Версия для печати темы

Автор: El_Encarnado 17.12.2007 21:50

Доброго времени суток. Столкнулся с задачкой,а как решить,к сожалению, не знаю. Нужна ваша помощь!

Собственно сама задача:

Куб состоит из n3 прозрачных и не прозрачных элементарных кубиков. Имееется ли хотябы 1 просвет по каждому из трех измерений? Если это так,вывести координаты каждого просвета.
Рекомендация: Для хранения кубика выделить 3ех мерный массив с базовым типом минимально возможного размера,так как значениями его будут только 1 и 0. При тестированиии полезно ипользовать рандомизацию случайным образом присвоить элементам 0 или 1,возможно с указанием вероятности тех или других с последующей послойной распечаткой.

И если можно,то с пояснениями основных моментов. Заранее спасибо.

ЗЫ Рекомендация была в условии.

Автор: klem4 17.12.2007 22:08

на вскидку:

провсет в i-ом измерении есть, если есть такое i для которого

cube[i][j][k] = 1 для j = 1,n и k = 1,n

по аналогии для j-го и k-го измерений.

ну это повторюсь на вскидку ...

Автор: El_Encarnado 18.12.2007 15:57

Чета я ничего не понял. Ну это наверное от того,что опыта програмирования мало.
А если всетаки поплотнее задачкой заняться,какое ваше решение?

Автор: andriano 18.12.2007 16:06

Все правильно: прежде, чем пытаться изложить что-то на языке программирования, следуеь то же самое изложить сперва по-русски.
просвет - это значить, если смотреть на кубик перпендикулярно грани, все кубики, находящиеся на пути взгляда (вглубь большого куба), будут прозрачными. То есть мы, рассматривая куб со стороны одной грани, видим эту грань как квадрат n*n квадратиков. Квадратик будет прозрачным только в том случае, если все квадратики, что расположены за ним по всей толщине куба вплоть до противопорложной грани, будут прозрачными. Вот и надо рассмотреть куб со всех сторон (достаточно 3 раза - по количеству пространственных измерений) и выяснить, еслть ли с каждой стороны хотя бы по одному прозрачному квадратику.

Автор: El_Encarnado 20.12.2007 20:18

Ребят,помогите с задачкой. Скоро сдавать,а как решать я недопираю. Единственная нерешенная задача,а без неё типовой расчет не примут

Автор: andriano 20.12.2007 21:16

Ну тебе и так помогают, а что в это время делаешь ты?

Автор: El_Encarnado 21.12.2007 3:46

Зачеты сдаю\готовлюсь к ним\сдаю\готовлюсь...вот такой цикл уде 2 недели

Автор: andriano 21.12.2007 12:55

И теперь ты решил немножко перераспределить обязанности, чтобы мы готовились к твоим зачетам, а ты их только сдавал?

Автор: El_Encarnado 21.12.2007 23:01

Нет,я всего лишь попросил помощи у знающих людей,ибо как решить эту задачу я не представляю...А если бы я решил,как ты говориш,"перераспределить обязанности",я бы не решал предыдущие 3.

Автор: Michael_Rybak 21.12.2007 23:17

о_О

Ты полностью проигнорировал помощь andriano, с чего вдруг тебе кто-то еще будет помогать?

Автор: termin 22.12.2007 2:50

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

program Project1;

{$APPTYPE CONSOLE}

uses
SysUtils;

const n=5;

var
a: array [1..n,1..n,1..n] of byte;
i,j,k: integer;
vis: boolean;
begin
randomize;
for i:=1 to n do
for j:=1 to n do
for k:=1 to n do
a[i,j,k]:=random(2);
writeln('Massiv posloino po osi z');
for k:=1 to n do
begin
writeln;
writeln('Sloi ',k);
for i:=1 to n do
begin
writeln;
for j:=1 to n do
write(a[i,j,k],' ');
end;
writeln;
end;
for i:=1 to n do
for j:=1 to n do
begin
vis:=true;
for k:=1 to n do
if a[i,j,k]=1 then begin vis:=false; break; end;

if vis then writeln('Prosvet v tochke [',i,',',j,',z] po osi z');
end;
for j:=1 to n do
for k:=1 to n do
begin
vis:=true;
for i:=1 to n do
if a[i,j,k]=1 then begin vis:=false; break; end;
if vis then writeln('Prosvet v tochke [x,',j,',',i,'] po osi x');
end;
for i:=1 to n do
for k:=1 to n do
begin
vis:=true;
for j:=1 to n do
if a[i,j,k]=1 then begin vis:=false; break; end;
if vis then writeln('Prosvet v tochke [',i,',y,',k,'] po osi y');
end;
readln;
end.


ЗЫ И прежде чем что-либо говорить, надо головой сначала подумать.

Автор: Michael_Rybak 22.12.2007 3:00

Хохххоо )))

Это с какой, интересно, радости?


Ты считаешь, что решая за ленивых людей их проблемы, ты им помогаешь? Подумай, пожалуйста, головой. Если не сложно. Прежде, чем говорить что-либо. Ага.

лол

Добавлено через 1 мин.
И используй, пожалуйста, тег code

Добавлено через 1 мин.
И еще у тебя решение неправильное, кстати

"хотябы 1 просвет по каждому из трех измерений"

Автор: termin 22.12.2007 3:23

Кто тебе во-первых сказал, что он ленивый, если у него одна задача не получается сразу ленивым обзывать???
Даже если у меня и решение не правильное, я хоть зато пытаюсь добиться результата (хоть какого-либо), а сидеть и по предложению отписывать в каждый топик и я могу!

Автор: Michael_Rybak 22.12.2007 3:35

Никто не сказал. Зато два человека, klem4 и andriano, сказали достаточно много по теме. На что автор темы отреагировал как? Никак. Дайте мне код, мне некогда. Это я называю поведением ленивого человека.

Когда человеку нужно, и не лень, он просит *помощи*, а не сделать за него. Он сказал, что не может понять. Ему объясняют. Он продолжает говорить, что не может понять, и что ему вообще некогда. По-моему, достаточно прозрачно.

Где с его стороны видны хоть какие-то усилия в сторону решения задачи?


Какого именно результата? Халявного зачета без понимания решения? Или решения разжеванного, на блюдечке с голубой каемочкой?


Поверь, я часто на ответ трачу гораздо больше времени, чем ушло бы на то, чтобы написать полностью программу. Вот на эту ушло бы от силы семь минут, скорее пять.

Добавлено через 2 мин.

М

Дальнейший оффтоп, пожалуйста, или в личку, или в жалобную книгу.