Sos!!!

За вознаграждение или нахаляву (если повезёт)

Модераторы: Хыиуду, dr.Jekill, MOTOCoder, Medved

San4ez
Сообщения: 4
Зарегистрирован: 02 мар 2007, 14:10

02 мар 2007, 14:18

Ребятки, вы тут все такие умницы.... помогите решить задачку....
San4ez
Сообщения: 4
Зарегистрирован: 02 мар 2007, 14:10

02 мар 2007, 14:20

Задача такова:

Дана целочисленная квадратная матрица A (n,n).роверьте, являются ли все числа, расположенных выше главной и побочной диагоналей: различными способам.
Хыиуду
Сообщения: 2388
Зарегистрирован: 06 мар 2005, 21:03
Откуда: Москва
Контактная информация:

02 мар 2007, 15:23

Ответ: все числа в целочисленной квадратичной матрице A(n,n) выше главной и побочной диагоналей, являются числами, а не различными способами.

На будущее - темы надо называть осмысленно
Искусство программирования - заставить компьютер делать все то, что вам делать лень.
Для "спасибо" есть кнопка "Спасибо" в виде звездочки внизу под ником автора поста.
Аватара пользователя
Колядин Максим
Сообщения: 285
Зарегистрирован: 16 ноя 2006, 19:09
Откуда: Seattle, WA
Контактная информация:

02 мар 2007, 16:13

San4ez писал(а):Задача такова:

Дана целочисленная квадратная матрица A (n,n).роверьте, являются ли все числа, расположенных выше главной и побочной диагоналей: различными способам.
Что за ".роверьте", что за "числа, расположенных" и что за "выше главной и побочной диагоналей: различными способам."???
P. S. Попробуй сам понять смысл поставленного тобой вопроса...
Программист - это человек, который решает способом, который вы не понимаете, проблемы, о которых вы даже не подозревали...
San4ez
Сообщения: 4
Зарегистрирован: 02 мар 2007, 14:10

02 мар 2007, 18:19

Ещё раз пишу...

Дана целочисленная квадратная матрица A (n,n). Проверьте, являются ли все числа различными, расположенные выше главной и побочной диагоналей.
San4ez
Сообщения: 4
Зарегистрирован: 02 мар 2007, 14:10

03 мар 2007, 19:32

Ребятки, ну, помогите...!!!! Плиииизззз! )))))
Аватара пользователя
Oleg_Rus
Сообщения: 330
Зарегистрирован: 16 окт 2006, 09:56
Откуда: г.Улан-Удэ, респ.Бурятия, Российская Федерация
Контактная информация:

05 мар 2007, 04:57

можно устроить прогон по матрице, занести все числа в одномерный массив, и проверяем на различность.

все просто...
e-mail: garmayev@yandex.ru
---------------------------------------------------------------------------
<a href="http://nick-name.ru/sertificates/711965/"><img src="http://nick-name.ru/img.php?nick=Garmay ... =2&text=t5" alt="Никнейм Garmayev зарегистрирован!" /></a>
Аватара пользователя
Oleg_Rus
Сообщения: 330
Зарегистрирован: 16 окт 2006, 09:56
Откуда: г.Улан-Удэ, респ.Бурятия, Российская Федерация
Контактная информация:

05 мар 2007, 05:00

Razn:=False;

// просотр массива
for i:=1 to n do
for j:=1 to n do
begin
b[k]:=a[n, n];
inc(k);
end;

// проверка
for i:=1 to n do
for j:=1 to n do
if b=b[j] then Razn:=True;

if Razn then writeln('Yes') else Writeln('No');
________________

если кто увидит ошибку, проссьба - известить!
e-mail: garmayev@yandex.ru
---------------------------------------------------------------------------
<a href="http://nick-name.ru/sertificates/711965/"><img src="http://nick-name.ru/img.php?nick=Garmay ... =2&text=t5" alt="Никнейм Garmayev зарегистрирован!" /></a>
Аватара пользователя
somewhere
Сообщения: 1837
Зарегистрирован: 31 авг 2006, 17:14
Откуда: 71 RUS
Контактная информация:

05 мар 2007, 09:20

&quot писал(а):b[k]:=a[n, n];
А смысл-то какой одно и тоже число дублировать?
&quot писал(а):// просотр массива
for i:=1 to n do
for j:=1 to n do
begin
b[k]:=a[n, n];
inc(k);
end;
Да и вообще лишняя операция - можно сделать на месте
&quot писал(а):for i:=1 to n do
for j:=1 to n do
if b=b[j] then Razn:=True;

Что-то тяжело до меня доходит зачем такая вложенность? Не проще-ли так?

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

for i:=1 to n-1 do if b[i]=b[i+1] then Razn:=True;
А лучше так

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

I := 2;
While (i<n) and (b[i]<>b[i-1]) do inc(I);
Razn := (I=n);
Вообще задача - установить различие элементов ВЫШЕ главной и побочной диагоналей. Координато этих элементов легко установить, из них исключить те, которые принадлежат главной (X=Y) и побочной (X=N-Y+1)
It's a long way to the top if you wanna rock'n'roll
Аватара пользователя
Oleg_Rus
Сообщения: 330
Зарегистрирован: 16 окт 2006, 09:56
Откуда: г.Улан-Удэ, респ.Бурятия, Российская Федерация
Контактная информация:

05 мар 2007, 09:43

// цитата от Somewhere
for i:=1 to n-1 do if b=b[i+1] then Razn:=True;

а тебе не кажется, что здесь она проверит только два стоящих рядом элемента?
а если будет так 1 3 4 1?

провериться только 1 и 2, 2 и 3, 3 и 4, а 1 и 4 не сравниваются...
e-mail: garmayev@yandex.ru
---------------------------------------------------------------------------
<a href="http://nick-name.ru/sertificates/711965/"><img src="http://nick-name.ru/img.php?nick=Garmay ... =2&text=t5" alt="Никнейм Garmayev зарегистрирован!" /></a>
Ответить