Страница 2 из 2
Re: Sos!!!
Добавлено: 05 мар 2007, 09:45
Oleg_Rus
// цитата от Somewhere
Да и вообще лишняя операция - можно сделать на месте
вероятно можно, но мне кажется так более понятно...
Re: Sos!!!
Добавлено: 05 мар 2007, 09:51
Duncon
Oleg_Rus, скачай себе книжку наконец почитай про циклы - ты их не понимаешь..
Понятно, не есть задача программиста - важен оптимзированный код, а не красивый в написании..
Re: Sos!!!
Добавлено: 05 мар 2007, 10:06
somewhere
" писал(а):
а тебе не кажется, что здесь она проверит только два стоящих рядом элемента?
а если будет так 1 3 4 1?
Это код, который вероятно хотел написать ты.
Для справки - нет нужды проверять все и вся на равенство. Элементы по сути образуют логическую цепочку. Каждые два соседних меняют логику общего результата. И если хотя бы одна пара не равна - тогда общий результат - False;
Re: Sos!!!
Добавлено: 05 мар 2007, 17:24
Хыиуду
Если N невелико, можно сделать так:
Код: Выделить всё
var P:set of integer;
begin
for i:=1 to n do
for j:=1 to n do
if {число A[i,j] находится там где надо:}
if A[i,j] in P then begin writeln('No'); exit;end
else include(A[i,j],P)
writeln('Yes');
end.
Re: Sos!!!
Добавлено: 05 мар 2007, 19:07
Колядин Максим
Oleg_Rus писал(а):
// цитата от Somewhere
Да и вообще лишняя операция - можно сделать на месте
вероятно можно, но мне кажется так более понятно...
На будущее - цитаты пишутся так:
Хыиуду писал(а): Если N невелико, можно сделать так: .... [/quotе]