как cоздать программно директорию и 3 файла в ней: 2 текстовых и 1 командный. Имена запрашивать с клавиатуры. Вывести на экран имя командного файла???
> как cоздать программно директорию и 3 файла в ней: 2 текстовых
>и 1 командный. Имена запрашивать с клавиатуры. Вывести на экран имя
>командного файла???Боюсь разочаровать вас, господин студиозус, но свое домашнее задание
вам лучше все-таки выполнять самостоятельно.
>> как cоздать программно директорию и 3 файла в ней: 2 текстовых
>>и 1 командный. Имена запрашивать с клавиатуры. Вывести на экран имя
>>командного файла???
>
>Боюсь разочаровать вас, господин студиозус, но свое домашнее задание
>вам лучше все-таки выполнять самостоятельно.+стопицот
зачем тогда нужен ваш форум, если никто не может сказать как ету фигню сделать??? если бы я знал как ето делается, то не спрашевал
Для общения, а не для "фигни". Неожиданненько??
>зачем тогда нужен ваш форум, если никто не может сказать как ету
>фигню сделать??? если бы я знал как ето делается, то не
>спрашевалДело не в том, знаете вы или нет. Почитайте правила, которые выдаются наверху страницы, когда вы создаёте новую тему. И рекомендации для спрашивающих, на которые там есть ссылка. Если вам лень прочитать несколько строк, почему вы думаете, что кому-то будет не лень разбираться с вашими проблемами, к тому же носящими отнють не технический характер.
>если бы я знал как ето делается, то не спрашевалТак вы бы узнали. Для этого достаточно не прогуливать лекции или попросить
конспекты у кого-нибудь из своих товарищей. Поисковые системы также никто
не запретил.Впрочем, если вам нужны не знания, а лишь халява, можете их не получать.
Чем меньше вы знаете, тем более ценны как специалисты те, кто этими
знаниями обладает. ;-)
>зачем тогда нужен ваш форум, если никто не может сказать как ету фигню сделать???Явно не для того, чтобы делать за вас домашние задания.
> как cоздать программно директорию и 3 файла в ней: 2 текстовых
>и 1 командный. Имена запрашивать с клавиатуры. Вывести на экран имя
>командного файла???begin
if (userinput() = directory_name) then begin
mkdirectory(directory_name);
cd(directory_name);
if (userinput() = file_name) then create_file(file_name);
do before 1 times 3;
end;end.
>[оверквотинг удален]
>
>begin
> if (userinput() = directory_name) then begin
> mkdirectory(directory_name);
> cd(directory_name);
> if (userinput() = file_name) then create_file(file_name);
> do before 1 times 3;
> end;
>
>end.Вы создаете три однотипных файла, а по заданию требуется два текстовых
и один командный. ;-) Может быть, стоит запрашивать у пользователя и
тип файла? :-)
>Вы создаете три однотипных файла, а по заданию требуется два текстовых
>и один командный. ;-) Может быть, стоит запрашивать у пользователя и
>тип файла? :-)Точно блин.
use Telepathy;
begin
if (userinput() = directory_name) then begin
mkdirectory(directory_name);
cd(directory_name);
if (userinput() = file_name) then
switch (usermeaning())
CREATE_TXT_FILE: create_txt_file(file_name);
CREATE_CMD_FILE: create_cmd_file(file_name);
do before 1 times 3 until usermeaning() <> AGREE;
end;end.
>[оверквотинг удален]
> mkdirectory(directory_name);
> cd(directory_name);
> if (userinput() = file_name) then
> switch (usermeaning())
> CREATE_TXT_FILE: create_txt_file(file_name);
> CREATE_CMD_FILE: create_cmd_file(file_name);
> do before 1 times 3 until usermeaning() <> AGREE;
> end;
>
>end.Нету вывода списка созданных файлов в конце. И не подключены следующие модули:
Use FileManage;
Use DevHands;Ну и нужна обязательно проверка в начале исходника:
#if defined(HandsFromAss)
#undef HandsFromAss
#endifИначе не скомпилится.
Ну как студент, твердая пятерка? Ответь плиз.
>Ну как студент, твердая пятерка? Ответь плиз.Если он студент, то я боюсь за будущее русского программного обеспечения.