это не Я писал.
там так было =\
хотя помню примерно так же всё писал на паскале где русские быквы нужны были

Тема затухла, пиздану тут че нить... :|

Практика =(
 

В общем практика в вузе все дела, первую часть на MathCad'e сделал... А вот вторая засыпала мозг =( Задача на паскале вроде не сложная, но как организовать все не понимаю :confused:
Вот собственно и она

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

Например дан входной файл содержащий массив:
0 0 1 1 1 1 0
0 0 1 1 1 1 0
0 1 1 1 1 1 0

Выходные данные в этом случае:
1 1 1 1
1 1 1 1
1 1 1 1

В общем кто разбирается и может помочь напишите че да как.... очень надо :)

то есть внутренние прямоугольники не считаются? тогда всё сводится к нахождению последовательностей единичек по горизонтали и вертикали.
хотя наверняка есть более простое алгоритмическое решение это задачи.

то есть внутренние прямоугольники не считаются? тогда всё сводится к нахождению последовательностей единичек по горизонтали и вертикали.
хотя наверняка есть более простое алгоритмическое решение это задачи.

жизнь программиста бле
слова которых не услышешь на улице:horosho:

В общем суть такая что весь прямоугольник должен состоять из единичек, и ограничен со всех сторон нулями... так к примеру

1 1 1 0
1 1 1 0 - прямоугольник есть

а если

0 1 1 1 1 0
0 1 1 1 1 1
0 1 1 1 1 0 - здесь нет ни одного прямоугольника

если по такой схеме, то это неверно:

Есть.
1 1 1 1
1 1 1 1
1 1 1 1

есть программисты занимающиеся ПХП, инетерсующихся в хип-хопе? есть интересная идея, как создать нечто прибыльное возможно и интересное.

Вещай.

Он вроде сказал, что со всех сторон ограничение - нулями, а там единица проскакивает.

скину завтра в л\с половину ТЗ, дальше по обстоятельствам.

По его входным и выходным данным - это не так.

точно именно эта единица и мешает ;) я тут накатал тоже процедурку, но она не работает нифига =(

program pract_summer;
uses crt;
const n=5;
type mass=array[0..n-1,0..n-1] of integer;
var a:mass;
z,i,j:longint;
input,output: text;
procedure search (var i:integer; var j:integer; var z:integer);
var k,p,r,m,sh,pp,rr:integer;
begin
k:=0;
m:=0;
p:=i;
r:=j;
While (a[i,j]=z) do
begin
k:=k+1;
j:=j+1;
end;
j:=r;
While (a[i,j]=z) do
begin
m:=m+1;
i:=i+1;
end;
i:=p;
j:=r;
sh:=k;
if (m <> 1) and (k<>1) then
begin
While (a[i,j]=z) do
begin
if (sh=k) then
begin
sh:=0;
j:=r;
While (a[i,j]=z) do
begin
sh:=sh+1;
j:=j+1;
end;
end;
i:=i+1;
end;
end;
pp:=i;
rr:=j;
i:=p;
j:=r;
if ((pp-1)=m) and ((rr-1)=k) then
begin
While (a[i,j-1] <> z) do
i:=i+1;
If ((i-1) >= (m-1)) then
begin
i:=p;
j:=r;
While (a[i,j+k] <> z) do
i:=i+1;
if ((i-1)>=(m-1)) then
begin
i:=p;
j:=r;
While (a[i-1,j]<>z) do
j:=j+1;
if ((j-1)>=(k-1)) then
begin
i:=p;
j:=r;
While (a[i+m,j]<>z) do
j:=j+1;
if ((j-1)>=(k-1)) then
begin
For i:=p to (p+m) do
For j:=r to (r+k) do a[i,j]:=5
end;
end;
end;
end;
end;
End;
Begin
Assign(input,'C:\PABCWork\a.in');
Reset(input);
Assign(output,'C:\PABCWork\a.out');
Rewrite(output);
Readln(input,z);
For i:=0 to n-1 do
begin
readln(input);
For j:=0 to n-1 do read(input,a[i,j]);
end;
For i:=0 to n-1 do
For j:=0 to n-1 do
begin
If (a[i,j]=z) then
begin
search(i,j,z);
end;
end;
For i:=0 to n-1 do begin
writeln(output);
For j:=0 to n-1 do begin
write(output, a[i,j]);
end;
end;
close(output);
close(input);
end.

Там я опечатался немного :(

Ниже привел здоровый пример ;)

вот накатал программку, уверен на сто процентов что все правильно,
15 раз перепроверил, но сука выдает какую то фигню =(
Может кто найдет ошибку
Вот файл с прогой....
http://rghost.ru/14851631

Приветы!
Здесь рабочую силу можно найти? Не за спасибо, конечно же:saint:

в 1с кто нибудь пишет?

А что требуется?

программист с опыт работы, навыками работы во флэше, желательно наличие портфолио.
суть работы объясню уже тому, кто способен и в лс, либо в icq/skype/mail agent и т.д.

Ясно, с флэшем помочь не смогу. Было бы прикладное программирование, то предложил бы свои услуги

Кстати, кто шарит.
на друпал можно менять адрес ссылки, например с mysite.ru/3 на mysite.ru/huinya ? :confused:
или другом движке такое реализовать лучше, но желательно на друпал? :confused:

:black:

спасибо :horosho:
но это автоматически на новые.

а если старые менять надо? пересоздавать, как вариант.
или этот патч поможет тоже? :confused:

:black:

Старые, ты имеешь ввиду - дефолтные?
Если да, то скорее всего поможет, это обычное чпу.
Погугли на тему drupal чпу, если не поможет.
Просто тут расписывать долго, вот в друпале модули какие то подрубать,
в zf например маршруты в конфиге прописываются.

да.
ну там страницы уже созданы, и название с цифрами.

хорошо.)

появятся вопросы, черкану тут:)

:black:

нате пасоны:dovolen:
[email protected]:1846alch Баланс: 278 руб. 86 коп.
[email protected]:230894 Баланс: 3 руб. 50 коп.
[email protected]:qwerty Баланс: 0 руб.
[email protected]:10041983 Баланс: 0 руб.
[email protected]:25071988 Баланс: 0 руб. 97 коп.
[email protected]:120192 Баланс: 0 руб. 43 коп.
[email protected]:qwerty Баланс: 187 руб.
[email protected]:230894 Баланс: 3 руб. 50 коп.
[email protected]:qwerty Баланс: 0 руб.
[email protected]:120192 Баланс: 0 руб. 43 коп.
[email protected]:qwerty Баланс: 0 руб.
[email protected]:031170 Баланс: 0 руб.
[email protected]:12345678 Баланс: 1 руб. 80 коп.
[email protected]:123456789 Баланс: 0 руб.
[email protected]:18101972 Баланс: 0 руб. 96 коп.
[email protected]:10061960 Баланс: 0 руб.
[email protected]:19031985 Баланс: 0 руб.
[email protected]:18101972 Баланс: 0 руб. 96 коп.
[email protected]:qwerty Баланс: 0 руб. 25 коп.
[email protected]:210477 Баланс: 0 руб.
[email protected]:26061983 Баланс: 0 руб.
[email protected]:250383 Баланс: 0 руб.
[email protected]:qwerty Баланс: 0 руб. 03 коп.
[email protected]:080172 Баланс: 17 руб. 61 коп.
[email protected]:lineage2c4 Баланс: 0 руб. 03 коп.
[email protected]:569979 Баланс: 3 руб. 74 коп.
[email protected]:29021964 Баланс: 4 руб.
[email protected]:dujmy43 Баланс: 0 руб. 41 коп.
[email protected]:443579 Баланс: 0 руб. 88 коп.
[email protected]:111111 Баланс: 0 руб. 02 коп.
[email protected]:SHARP1993 Баланс: 0 руб. 39 коп.
[email protected]:qwertyuiop Баланс: 4 руб. 62 коп.
[email protected]:qwertyuiop Баланс: 0 руб. 10 коп.
[email protected]:fajyby1994 Баланс: 5 руб.
[email protected]:Nbvfnbforev5 Баланс: 0 руб. 22 коп.
[email protected]:artist69 Баланс: 0 руб. 08 коп.
[email protected]:fhq325ll Баланс: 5 руб. 01 коп.
[email protected]:89132184502 Баланс: 0 руб. 18 коп.

не один не пашет