ANTICHAT — форум по информационной безопасности, OSINT и технологиям
ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию.
Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club,
и теперь снова доступен на новом адресе —
forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
 |
|

21.05.2009, 19:40
|
|
Познающий
Регистрация: 12.05.2009
Сообщений: 45
Провел на форуме: 255342
Репутация:
28
|
|
Сообщение от DTW
как сделать чтоб оператор case выдавал варианты из введеного слово ?
Case со словами не работает, if-ками решай )
можно поизвращаццо с array [0..N] of string, в цикле for искать значение = введенному и передавать ИД case-у , но это реально изврат )
|
|
|

21.05.2009, 21:29
|
|
Постоянный
Регистрация: 31.01.2008
Сообщений: 643
Провел на форуме: 6128108
Репутация:
445
|
|
Если в цикле прописать "exit;" (без ковычек) то цикл будет начинаться заного после этой команды?
|
|
|

21.05.2009, 22:22
|
|
Постоянный
Регистрация: 29.04.2007
Сообщений: 496
Провел на форуме: 2715445
Репутация:
588
|
|
diznt
нет, можно написать continue и тогда цикл пойдёт дальше.
|
|
|

22.05.2009, 12:45
|
|
Познающий
Регистрация: 08.12.2008
Сообщений: 58
Провел на форуме: 153361
Репутация:
10
|
|
народ помогите решить 3 задачи на паскале, писал в соседнем топике но там никто не отвечает уже 3 дня, готов даже заплатить (просто срочно нужно до завтра), вот задачи:
1. Дан текстовый файл с расширением inp, в котором каждая строка содержит последовательность действительных чисел. Выяснить, будут ли последовательности возрастающие. Результат анализа (Да или Нет) записать в выходной файл с расширением out (построчно).
2. В данной действительной квадратной матрице порядка n отсортировать строку, в которой расположен элемент с наименьшим значением. Предполагается, что такой элемент единственен. Во входном файле с расширением mas, в первой строке дан размер матрицы n, а в следующих n строках и n столбцах записаны элементы матрицы. Результат выполнения программы вывести на экран.
3. Создать типизированный файл Task5.txt с возможностью добавления, содержащий сведения о веществах: название вещества (текст(10), его удельный вес (действительное) и проводимость (проводник, полупроводник, изолятор) (текст[13]). Необходимо создать отчет (использовать подпрограммы):
a) выписать удельные веса и названия всех полупроводников и вывести на экран с заголовком "Полупроводники";
b) выбрать данные о проводниках с удельным весом не более 10 и вывести на экран после информации о полупроводниках, вставив заголовок "Проводники";
c) вывести все содержимое типизированного файла в текстовый файл Task5.sol.
Пример входного файла Task5.txt:
Фарфор 2.3 изолятор
Железо 7.9 проводник
Золото 19.3 проводник
Кремний 2.3 полупроводник
Железо 7.9 проводник
Стекло 2.5 изолятор
|
|
|

22.05.2009, 14:27
|
|
Участник форума
Регистрация: 01.02.2005
Сообщений: 233
Провел на форуме: 748321
Репутация:
112
|
|
подскажите...
допустим есть файл (c:\temp\12312.tmp)
который занят моей программой...
и как нить можно узнать если какой либо другой процес попытается его
открыть, изменить, удалить ???
|
|
|

22.05.2009, 16:46
|
|
Познающий
Регистрация: 12.05.2009
Сообщений: 45
Провел на форуме: 255342
Репутация:
28
|
|
Сообщение от AHTOLLlKA
подскажите...
допустим есть файл (c:\temp\12312.tmp)
который занят моей программой...
и как нить можно узнать если какой либо другой процес попытается его
открыть, изменить, удалить ???
Было..
http://forum.antichat.ru/showthread.php?p=1238884-%F4%E0%E9%EB+%E7%E0%ED%FF%F2#post1238884
|
|
|

22.05.2009, 21:32
|
|
Участник форума
Регистрация: 06.03.2007
Сообщений: 283
Провел на форуме: 1547094
Репутация:
120
|
|
Delphi
Подскажите что прописать в "procedure TForm1.FormCreate" что бы программа копировала саму себя(именно сам EXE файл), ну допустим в диск C:\ ???
|
|
|

22.05.2009, 22:50
|
|
Познавший АНТИЧАТ
Регистрация: 29.04.2007
Сообщений: 1,189
Провел на форуме: 5749763
Репутация:
1680
|
|
Сообщение от xaker-boss
Подскажите что прописать в "procedure TForm1.FormCreate" что бы программа копировала саму себя(именно сам EXE файл), ну допустим в диск C:\ ???
CopyFileTo(Application.ExeName, 'C:\virus.exe');
Но перед этим в uses впиши: IdGlobal
Последний раз редактировалось Nightmarе; 22.05.2009 в 22:54..
|
|
|

22.05.2009, 23:20
|
|
Участник форума
Регистрация: 06.03.2007
Сообщений: 283
Провел на форуме: 1547094
Репутация:
120
|
|
он мне выдает это:
[DCC Error] Unit1.pas(133): E2003 Undeclared identifier: 'CopyFileTo'
[DCC Error] Project1.dpr(6): F2063 Could not compile used unit 'Unit1.pas'
|
|
|

23.05.2009, 00:32
|
|
Познавший АНТИЧАТ
Регистрация: 29.04.2007
Сообщений: 1,189
Провел на форуме: 5749763
Репутация:
1680
|
|
Сообщение от xaker-boss
он мне выдает это:
[DCC Error] Unit1.pas(133): E2003 Undeclared identifier: 'CopyFileTo'
[DCC Error] Project1.dpr(6): F2063 Could not compile used unit 'Unit1.pas'
Так я же написал "Но перед этим в uses впиши: IdGlobal"
|
|
|
|
 |
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|