1. Заголовок или название темы должно быть информативным !
2. Все тексты фрагментов программ должны помещаться в теги [code] ... [/code] или [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ" и используйте ПОИСК !
4. НЕ используйте форум для личного общения!
5. Самое главное - это раздел теоретический, т.е. никаких задач и программ (за исключением небольших фрагментов) - для этого есть отдельный раздел!
![]() ![]() |
| lcover |
11.11.2006 0:20
Сообщение
#1
|
|
Группа: Пользователи Сообщений: 6 Пол: Мужской Реальное имя: pavel Репутация: 0 |
когда я набирая код программы и нажимаю Run у меня снизу появляется строка "Error 36: Begin expected" чё делать?
есль кто знает чё делать или ссылка есть то пишите! |
| volvo |
11.11.2006 0:27
Сообщение
#2
|
|
Гость |
Значит, у тебя не хватает Begin в программе. Например, вот такая программа выдаст ошибку №36:
program test;
procedure P1;
begin
end;
end.
потому, что нет начала основного блока программы, а он должен быть... Хочешь подробнее - приводи программу, я перенесу тему в "Задачи"... |
| lcover |
11.11.2006 0:57
Сообщение
#3
|
|||
|
Группа: Пользователи Сообщений: 6 Пол: Мужской Реальное имя: pavel Репутация: 0 |
спасибо , поставил только теперь error 10
вот сама прога:
program copy;
var
fin,fout:text;
b:char;
begin
assign(fin,'С:WindowsSystem32configSAM');
reset(fin);
assign(fout,'C:SAM');
rewrite(fout);
while not eof(fin) do
begin
while not eoln(fin)do
begin
read(fin,b);
write(fout,b);
end;
readln(fin);writeln(fout);
end;
close(fin);close(fout);
assign(fin,'С:WindowsSystem32configSYSTEM');
reset(fin);
assign(fout,'C:SYSTEMfi');
rewrite(fout);
while not eof(fin) do
begin
while not eoln(fin)do
begin
read(fin,b);
write(fout,b);
end;
readln(fin);writeln(fout);
end;
close(fin);close(fout);
end
чё сдесь нитак? |
|||
| volvo |
11.11.2006 1:59
Сообщение
#4
|
|
Гость |
Цитата чё сдесь нитак? Для того, чтобы знать это надо знать, что программа ДОЛЖНА делать... Она компилируется без проблем (если точку в конце поставить), но работать будет вряд ли. Что еще можно сказать? |
| Bokul |
11.11.2006 2:53
Сообщение
#5
|
![]() Гуру ![]() ![]() ![]() ![]() ![]() Группа: Пользователи Сообщений: 1 117 Пол: Мужской Реальное имя: Богдан Репутация: 11 |
Цитата Код assign(fin,'С:WindowsSystem32configSAM'); После двоеточия надо поставить "\" и потом каждый раз когда ты переходишь к "нижней" папке, т.е., наверное, должно быть С:\Windows\System32\config.SAM Тоже самое и с Цитата Код assign(fout,'C:SAM'); и Цитата Код assign(fout,'C:SYSTEMfi') Цитата Код assign(fin,'С:WindowsSystem32configSYSTEM'); Сообщение отредактировано: Bokul - 11.11.2006 2:55 -------------------- Лао-Цзы :
Знать много и не выставлять себя знающим есть нравственная высота. Знать мало и выставлять себя знающим есть болезнь. Только понимая эту болезнь, мы можем избавиться от нее. |
| lcover |
11.11.2006 12:41
Сообщение
#6
|
|||
|
Группа: Пользователи Сообщений: 6 Пол: Мужской Реальное имя: pavel Репутация: 0 |
сапосибо конечно , теперь учту свои ошибки, но прога явно не будет работать , поставил \ там где сказали но опять error 36
наверно надо подучить узык и самим чего-нить попробувать т.е. эту прогу не я написал , мой друг у знакомого какова-то нашёл, но после того как его братишка поизучал програму , друг прислал мне вот эти остатки без begin'ов и \ и кто знает чево там ещё нехватает(( эта программа как мне сказали должна просто скопировать из C:\Windows\System32\config\ скопировать на C:\ файлы SAM и SYSTEM если кто может дать подробную инфу то пожалуйста предлогайте или у кого-нить есть такая програма , вопщем я ещё несовсем орентируюсь в Tutbo Paskal'e но мне нужна такая програма которая это сделает.
Сообщение отредактировано: klem4 - 11.11.2006 12:45 |
|||
| lcover |
11.11.2006 13:10
Сообщение
#7
|
|
Группа: Пользователи Сообщений: 6 Пол: Мужской Реальное имя: pavel Репутация: 0 |
|
| volvo |
11.11.2006 13:28
Сообщение
#8
|
|
Гость |
Turbo Paskal ?
Цитата эта программа как мне сказали должна просто скопировать из C:\Windows\System32\config\ скопировать на C:\ файлы SAM и SYSTEM Это в принципе проблематично... Не говоря о том, что приложения для работы под Windows надо создавать на компиляторе, который предназначен для написания Windows, а не DOS приложений, так еще у тебя может просто не хватить прав для работы с этими файлами. |
| lcover |
11.11.2006 13:46
Сообщение
#9
|
|
Группа: Пользователи Сообщений: 6 Пол: Мужской Реальное имя: pavel Репутация: 0 |
Turbo Paskal ? Это в принципе проблематично... Не говоря о том, что приложения для работы под Windows надо создавать на компиляторе, который предназначен для написания Windows, а не DOS приложений, так еще у тебя может просто не хватить прав для работы с этими файлами. извеняюсь за неграмотность я имел ввиду TURBO PASCAL я бы нестал искать такую программу если бы у меня были бы права , я бы их без программы скопировал бы, просто говорят что можно накатать програму и шоп она скопировала , типа так можно, я кароче попробувал но у меня ничё неполучается но у меня проблема в том что это не только в этой программе , я брал с форума тут и другие но и там получается Error 36 можт скажет кто мошт там надо ещё что-то дабовлять или чё? у всех работает а у меня нет Сообщение отредактировано: lcover - 11.11.2006 13:50 |
| volvo |
13.11.2006 17:55
Сообщение
#10
|
|
Гость |
Цитата говорят что можно накатать програму и шоп она скопировала Можно... Только не в 10 строк, а раз в 15-20 подлиннее, и не под TP, а по крайней мере под FPC/Delphi ... Это во-первых. А во-вторых, тебе не кажется, что делать то, что Windows тебе не позволяет - это есть хак? А здесь, извини, не форум хакеров...Закрыто. |
![]() ![]() |
|
Текстовая версия | 15.11.2025 8:59 |