Страница 2 из 2

Re: zadacha po ACM

Добавлено: 29 дек 2006, 15:28
Diploboy
Da, ya uje ubral eti stroki, no SERVER govotir chto OTVET LOJNIY!!!

Re: zadacha po ACM

Добавлено: 29 дек 2006, 16:05
SergeyS
К сожалению мне нужно убегать домой (я на работе юзаю инет) и соответственно привести решение задачи не могу, но глядя на твой оригинальный алгоритм, скажу так: ты изначально мыслишь не верно. Пересмотри задачу полностью. Например, должны получиться три пары одинаковых сторон (это обязательно). Четыре стороны должны иметь одинаковую высоту, четыре стороны должны иметь одинаковую ширину. Проверь хотя бы эти параметры.

Re: zadacha po ACM

Добавлено: 29 дек 2006, 16:08
SergeyS
Вношу поправку (и извиняюсь).
Ты все же проверяешь на наличие равных сторон. Сделай так:

Код: Выделить всё

k:=0;
for i:=1 to 6 do
  for j:=1 to 6 do
  begin
    if (i <> j) then
      if (a[i,1]=a[j,1]) and (a[i,2]=a[j,2]) then
      begin
        k:=k+1;
      end;
  end;

Re: zadacha po ACM

Добавлено: 29 дек 2006, 16:30
Diploboy
Vse taki, ne rabotayet, Potamu chto kogda VSE chisli budet rafni (to est KUB), to proga doyot oshibku