Ошибка 36 предполагается begin

program prog_2_2;                           //название программы
uses
 SysUtils, Math;
 label 10;                                          //метка
var                                 //блок описания переменных
    a,b,x,s,g: real;
    proba:integer;
procedure f1(k,m,n:real; var rez1:real);                //определение процедуры
begin                           //начало исполняемой части программы
    rez1:=power(n,3)*(sqr(tan(sqr(n+m))))+(k/(sqrt(n+m)));
end;
  procedure f2(o,p,r:real; var rez2:real);
begin
    rez2:=(p*sqr(r)-o)/(exp(o*r)-1);
end;
begin
10: writeln('Введите a, b, x');              //вывод на экран. Данные метки
    readln(a,b,x);                  //считывание введенного с клавиатуры
    writeln;
    writeln('Вы ввели');
    writeln('a= ',a:8:3,' b= ',b:8:3,' x= ',x:8:3);
    writeln;
    writeln('Введите 1, если правильно');
    readln(proba);
    if proba<>1 then                //условный оператор if . <> не равно
        begin
            writeln;
            goto 10;                        //переход к метке
        end;
    writeln;
    f1(a,b,x, s);           //вызов процедуры
    f2(a,b,x,g);
    writeln('Результат');
    writeln('s=',s:8:3,' g=',g:8:3);
    readln;
end.

Источник

msm.ru

Нравится ресурс?
Помоги проекту!

Выдает ошибку error 36: begin expected» Хотя программа вроде верно составлена

Подписаться на тему
Сообщить другу
Скачать/распечатать тему

Сообщ.
#1

,
02.03.10, 10:38

Expanded Wrap disabled

Program zad9;

user Crt;

Var

F_in,F_out:Text;

Matr : Array[1..50,1..40] of integer;

Sum : Integer;

str,stl : byte;

i,j : byte;

begin

clrscr

Assign(F_in,’Matr.txt’);

Reset(F_in);

str:=0;

stl:=0;

i:=0;

begin

inc(j);

Read(F_in,Matr[i,j]);

end;

Readln(F_in);

stl:=j;

end;

str:=i;

Writeln(‘Число строк=’,’str,’Число столбцов=’,stl);

Assign(F_out,’Sum.txt’);

Rewrite(F_out);

For i:=1 To str Do

begin

Som:=0;

For j:=1 To stl Do

Sum:=Sum+Matr[i,j];

Write(F_out,Sum:6);

Writeln(‘В строке ‘i’сумма=’,Sum);

end;

Close(F_in);

Close(F_out);

readln();

End.

Теги…

Сообщение отредактировано: volvo877 — 02.03.10, 10:46

volvo877

Сообщ.
#2

,
02.03.10, 10:51

Moderator

Рейтинг (т): 878

Издержки метода Copy+Paste… У тебя во-первых, UseR вместо UseS, во вторых пропущена точка с запятой, а в третьих, явно заголовок какого-то цикла, в котором ты увеличиваешь J и читаешь элемент Matr[i,j] пропущен.

Отформатируй программу как положено, «лесенкой», и увидишь, что Begin-ов меньше, чем End-ов… Исправляй…

Daiver

Сообщ.
#3

,
02.03.10, 11:56

Full Member

Рейтинг (т): 5

Похоже пропущено 2 цикла, плюс куча опечаток

Вот код без опечаток:

Expanded Wrap disabled

Program zad9;

uses Crt;

Var

F_in,F_out:Text;

Matr : Array[1..50,1..40] of integer;

Sum : Integer;

str,stl : byte;

i,j : byte;

begin

clrscr;

Assign(F_in,’Matr.txt’);

Reset(F_in);

str:=0;

stl:=0;

i:=0;

{Тут наверно пропущен цикл}

begin

{И еще один цикл}

begin

inc(j);

Read(F_in,Matr[i,j]);

end;

Readln(F_in);

stl:=j;

end;

str:=i;

Writeln(‘Число строк=’,str,’Число столбцов=’,stl);

Assign(F_out,’Sum.txt’);

Rewrite(F_out);

For i:=1 To str Do

begin

Sum:=0;

For j:=1 To stl Do

Sum:=Sum+Matr[i,j];

Write(F_out,Sum:6);

Writeln(‘В строке ‘,i,’сумма=’,Sum);

end;

Close(F_in);

Close(F_out);

readln();

End.

volvo877

Сообщ.
#4

,
02.03.10, 11:58

Moderator

Рейтинг (т): 878

Цитата Daiver @ 02.03.10, 11:56

Вот код без опечаток:

И что делает этот код?

Цитата Daiver @ 02.03.10, 11:56

{Тут наверно пропущен цикл}

Цитата Daiver @ 02.03.10, 11:56

{И еще один цикл}

, в результате код яйца выеденного не стоит…

Daiver

Сообщ.
#5

,
02.03.10, 12:06

Full Member

Рейтинг (т): 5

Просто код из первого поста без опечаток

SHeLLin

Сообщ.
#6

,
02.03.10, 12:32

Program zad9;

uses Crt;

Var
F_in,F_out:Text;
Matr : Array[1..50,1..40] of integer;
Sum : Integer;
str,stl : byte;
i,j : byte;
begin

Assign(F_in,’Matr.txt’);
Reset(F_in);
str:=0;
stl:=0;
i:=0;
While Not Eof(F_in) Do
begin
inc(i);
j:=0;
While Not Eoln(F_in) Do
begin
inc(j);
Read(F_in,Matr[i,j]);
end;
Readln(F_in);
stl:=j;
end;
str:=i;
Writeln(‘Число строк=’,str,’1=’,stl);
Assign(F_out,’Sum.txt’);
Rewrite(F_out);
For i:=1 To str Do
begin
Sum:=0;
For j:=1 To stl Do
Sum:=Sum+Matr[i,j]; {Суммирует элементы строк}
Write(F_out,Sum:6);
Writeln(‘В строке i сумма=’,Sum);
end;
Close(F_in);
Close(F_out);

End.

Добавлено 02.03.10, 12:32
Вот вроде без ошибок, но пытаюсь транспонировать матрицу, вместо суммы столбцов, и не могу :'(

Daiver

Сообщ.
#7

,
02.03.10, 12:41

Full Member

Рейтинг (т): 5

Цитата SHeLLin @ 02.03.10, 12:32

Вот вроде без ошибок, но пытаюсь транспонировать матрицу, вместо суммы столбцов, и не могу

Цитата SHeLLin @ 02.03.10, 12:32

For i:=1 To str Do
begin
Sum:=0;
For j:=1 To stl Do
Sum:=Sum+Matr[i,j]; {Суммирует элементы строк}
Write(F_out,Sum:6);
Writeln(‘В строке i сумма=’,Sum);
end;

Этот код как раз и считает сумму столбцов,

Транспонировать-в смысле поменять местами строки и столбцы?

Vesper

Сообщ.
#8

,
02.03.10, 12:41

переписывай процедуру вывода, от строк rewrite(f_out); до close(f_in);
Подсказка: Чтобы вывести матрицу в транспонированном виде, нужно во внешнем цикле проходить по столбцам, а во внутреннем — по строкам.

volvo877

Сообщ.
#9

,
02.03.10, 12:42

Moderator

Рейтинг (т): 878

SHeLLin, ты кнопку видишь, на которой написано CODE=pas? Нажимать ее не пробовал? Или по-твоему, приводить код к нормальному виду, чтобы его можно было хотя бы читать, должен кто-то другой? Исправляй, в конце концов, сам. Первый раз я за тебя поправил, ты, как видно, внимания не обратил…

И вообще, перестань переливать из пустого в порожнее. Где задание? Делаешь что-то, а что — фиг знает. И зачем тоже непонятно…

Добавлено 02.03.10, 12:45

Цитата Daiver @ 02.03.10, 12:41

Этот код как раз и считает сумму столбцов,

Ничего подобного. Считает он построчно суммы, ничего более…

Daiver

Сообщ.
#10

,
02.03.10, 12:51

Full Member

Рейтинг (т): 5

Цитата volvo877 @ 02.03.10, 12:42

Цитата (Daiver @ Сегодня, 15:41)
Этот код как раз и считает сумму столбцов,
Ничего подобного. Считает он построчно суммы, ничего более…

Ошибся… Ничего более

Добавлено 02.03.10, 13:01

Expanded Wrap disabled

for j:=1 to stl do

begin

for i:=1 to str do

write (F_out,matr[i,j],’ ‘);

writeln(F_out);

end;

Попробуй так

SHeLLin

Сообщ.
#11

,
02.03.10, 13:57

volvo877 Мне нужно из матрицы, которая будет в файле matr, сделать транспонированную, и записать в файл

Daiver

Сообщ.
#12

,
02.03.10, 15:39

Full Member

Рейтинг (т): 5

SHeLLin

Твой код только считает суммы элементов строк,
Попробуй этот код:

Expanded Wrap disabled

Program zad9;

Var

F_in,F_out:Text;

Matr : Array[1..50,1..40] of integer;

Sum : Integer;

str,stl : byte;

i,j : byte;

begin

Assign(F_in,’Matr.txt’);

Reset(F_in);

str:=0;

stl:=0;

i:=0;

While Not Eof(F_in) Do

begin

inc(i);

j:=0;

While Not Eoln(F_in) Do

begin

inc(j);

Read(F_in,Matr[i,j]);

end;

Readln(F_in);

stl:=j;

end;

str:=i;

Assign(F_out,’Sum.txt’);

Rewrite(F_out);

for j:=1 to stl do

begin

for i:=1 to str do

write (F_out,matr[i,j],’ ‘);

writeln(F_out);

end;

Close(F_in);

Close(F_out);

End.

SHeLLin

Сообщ.
#13

,
03.03.10, 05:09

Большое спасибо всем за помощь!!!!!!!

Добавлено 03.03.10, 05:20

0 пользователей читают эту тему (0 гостей и 0 скрытых пользователей)

0 пользователей:

Предыдущая тема
Pascal
Следующая тема

[ Script execution time: 0,0357 ] [ 15 queries used ] [ Generated: 29.01.23, 23:32 GMT ]

Источник

Сообщение компилятора об ошибках

Если
ошибка возникает при компиляции внутри
TP,
Турбо Паскаль активизирует окно
редактирования и помещает курсор на
место ошибки в исходной программе.

Если
ошибка возникает при использовании
командно-строчного компилятора, Турбо
Паскаль выдает сообщение об ошибке,
выводит на экран исходную строку
программы с ошибкой и ее номер; символ
^ в выдаваемой исходной строке указывает
местоположение ошибки. Ошибки
подразделяются на:

ошибки
при компилировании программы;
ошибки
на уровне DOS;
ошибки
ввода-вывода.

Ошибки при компилировании

1
Out of memory (Выход за пределы памяти)

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

2
Identifier expected (Ожидается идентификатор)

В этом месте должен
находиться идентификатор.

3
Unknown Identifier (Неизвестный идентификатор)

Этот идентификатор
не был описан.

4
Duplicate Identifier (Повторение идентификатора)

5
Syntax error (Синтаксическая ошибка)

В исходном тексте
найден недопустимый символ. Возможно,
не заключена в кавычки строковая
константа.

6
Error in real constant (Ошибка в константе
вещественного типа)

Ошибка в синтаксисе
константы вещественного типа.

7
Error In Integer constant (Ошибка
в
константе
целого
типа)

Ошибка
в синтаксисе константы целого типа
(Учтите, что после чисел, превышающих
диапазон представления целых чисел,
должны ставиться точка и нуль, например
12345678912.0.).

8
String constant exceeds line (Строковая константа
превышает размеры строки)

Вероятно, после
строковой константы отсутствует символ
кавычка.

9
Too many nested files (Слишком много вложенных
файлов)

Компилятор допускает
не более 15 вложенных исходных файлов и
не более 4 включаемых файлов.

10
Unexpected end of file (Неожиданный
конец
файла)

Данное сообщение
может появиться по одной из следующих
причин:

В Вашей программе,
вероятнее всего, неодинаковое количество
операторов BEGIN и END.

Включаемый
файл заканчивается в середине раздела
операторов (Каждый раздел операторов
должен целиком помещаться в одном
файле).

В Вашем файле не
закрыты скобки комментария.

11
Line too long (Строка слишком длинная)

Максимальная длина
строки не может превышать 127 символов.

12
Type Identifier expected (Ожидается идентификатор
типа)

В определенном
месте не указан тип идентификатора.

13
Too many open files (Слишком много открытых
файлов)

В
файле CONFIG.SYS не установлен параметр
FILES = N, где N — представляет собой целое
число без знака. Установите в файле
CONFIG.SYS значение параметра FILES = N >= 30.

14
Invalid file name (Недопустимое имя файла)

Имя файла неверно
или указан несуществующий путь.

15
File not found (Файл
не
найден)

Файл
не найден ни в одном из каталогов,
предназначенных для хранения файлов
данного типа.

16
Disk full (Диск заполнен)

Удалите
с диска ненужные Вам файлы (например
файлы с расширением .ВАК или .ТМР) или
попробуйте сохранить текст программы
на другом диске, который имеет достаточный
объем свободной памяти.

17
Invalid compiler directive (Недопустимая директива
компилятора)

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

18
Too many files (Слишком много файлов)

В
компиляции программы или программного
модуля участвует слишком много файлов.
Попытайтесь не использовать так много
файлов, например, объединяя включаемые
файлы.

19
Undefined type la pointer definition (Неопределенный
тип в описании указателя)

Вы
пытаетесь объявить типизированный
указатель, связанный с ранее необъявленным
типом данных.

20
Variable Identifier expected (Ожидается идентификатор
переменной)

В указанном курсором
месте ожидается идентификатор переменной.

21
Error in type (Ошибка в определения типа)

Определение типа
не может начинаться с этого символа.

22
Structure too large (Слишком длинная структура)

Максимально
допустимый размер любого структурированного
типа — 65520 байтов.

23
Set base type of range (Количество элементов в
множестве превышает допустимое значение)

Базовый
тип множества должен представлять собой
интервальный или перечисляемый тип
данных с не более чем 256 значениями.

24
File components may not be files or objects (Компоненты
файла
не
могут
быть
файлами
или
объектами)

Тип
компонентов файла не может быть объектным
типом, файловым типом или любым другим
структурированным типом, содержащим
компоненты типа файла или объекта.

25Invalid
string length (Неверная длина строки)

Длина описываемой
строки должна находиться в пределах
от 1 до 255.

26
Type mismatch (Несоответствие типов)

Причины, вызвавшие
появление данного сообщения, могут быть
следующими:

Несовместимы типы
переменной и выражения в операторе
присваивания.

Несовместимые
типы фактического и формального
параметров в обращении к процедуре или
функции.

Тип выражения
несовместимый с типом индекса при
индексировании массива.

Несовместимые
типы операндов в выражении.

27
Invalid subrange base type (Неправильный базовый
тип для интервала)

28Lower
bound greater than upper bound (Нижний
граница
превышает
верхнюю)

При
описании интервального типа данных Вы
объявили нижнюю границу диапазона
больше верхней.

29
Ordinal type expected (Ожидается перечисляемый
тип)

Вещественные,
строковые, структурные и ссылочные типы
в данном случае не допускаются.

30
Integer constant expected (Ожидается константа
целого типа)

31
Constant expected (Ожидается константа)

32
Integer or real constant expected (Ожидается константа
целого или вещественного типа)

33Pointer
type Identifier expected (Ожидается идентификатор
типа указатель)

Указанный курсором
идентификатор не является указателем.

34
Invalid function result type (Недопустимый тип
результата функция)

Правильными типами
результата функции являются все простые,
строковые и ссылочные типы.

35
Label Identifier expected (Ожидается идентификатор
метки)

Обнаружена ссылка
на метку, не описанную в разделе LABEL.

36
BEGIN expected (Ожидается оператор BEGIN)

37
END expected (Ожидается оператор END)

38
Integer expression expected (Ожидается выражение
целого типа)

39
Ordinal expression expected (Ожидается выражение
перечисляемого типа)

40
Boolean expression expected (Ожидается выражение
логического типа)

41
Operand types do not match operator (Несоответствие
типов
операнду)

Данная
операция не может применяться к операндам
этого типа. Такое сообщение будет
вызвано, например, при попытке выполнить
следующую операцию:’ 9′ DIV ‘G’ .

42
Error in expression (Ошибка
в
выражении)

Данный
идентификатор не может участвовать в
выражении указанным образом.

Возможно, вы забыли
указать операцию между двумя операндами.

43
Illegal assignment (Запрещенное присваивание)

Это сообщение
может появиться по следующим причинам:

файлам
и нетипизированным переменным нельзя
присваивать значения;
идентификатору
функции можно присваивать значения
только внутри раздела операторов данной
функции.

44
Field Identifier expected (Ожидается идентификатор
поля)

Данный идентификатор
не соответствует полю предшествующей
переменной типа RECORD или OBJECT.

45
Object file too large (Объектный файл слишком
большой)

Турбо Паскаль не
может компоновать OBJ-файлы размером
больше чем 64 Кбайта.

46
Undefined external (Не определена внешняя
процедура)

Внешняя процедура
или функция не имеет соответствующего
определения PUBLIC в объектном файле.
Убедитесь, что вы указали все объектные
файлы в директивах {$L <имя ОВJ-файла>),
и проверьте написание идентификаторов
процедуры или функции в файле .ASM.

47
Invalid object file record
(Недопустимая
запись объектного файла)

Файл .OBJ содержит
неверную объектную запись. Убедитесь
в том, что данный файл является
действительно OBJ-файлом.

48
Code segment too large (Сегмент кода слишком
большой)

Максимально
допустимый размер кода программы или
программного модуля ранен 65520 байтам.
Разбейте Вашу программу или программный
модуль на несколько частей.

49
Data segment too large (Сегмент данных слишком
большой)

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

50
DO expected (Ожидается оператор DO)

51
Invalid PUBLIC definition (Недопустимое
определение
PUBLIC)

Появление этого
сообщения возможно но следующим причинам:

Данный
идентификатор получил тип PUBLIC с помощью
соответствующей директивы языка
ассемблер, но не соответствует описанию
EXTERNAL в программе или программном модуле.
Две
или более директивы PUBLIC на языке
ассемблера определяют один и тот же
идентификатор.
OBJ-файл
определяет идентификатор PUBLIC вне
сегмента CODE.

52
Invalid EXTRN definition (Неправильное определение
EXTRN)

Появление этого
сообщения возможно по следующим причинам:

Из Ассемблера была
осуществлена ссылка с помощью директивы
EXTRN на идентификатор, который не был
описан в тексте Паскаль-программы.

Идентификатор
обозначает абсолютную переменную.

Идентификатор
обозначает процедуру или функцию типа
INLINE.

53
Too many EXTRN definition (Слишком много определений
типа EXTRN)

Турбо
Паскаль не может обрабатывать файлы
.OBJ при более чем 256 определениях EXTRN.

54
OF expected (Ожидается
оператор
OF)

55
INTERFACE expected (Ожидается
оператор
INTERFACE)

56
Invalid relocatable reference (Недопустимая
перемещаемая
ссылка)

Появление этого
сообщения возможно по следующим причинам:

OBJ-файл
содержит данные и перемещаемые ссылки
в сегментах, отличных от CODE, например,
при попытке описать инициализированные
переменные в сегменте DATA.
ORJ-файл
содержит ссылки с размерами в байтах
на перемещаемые символы. Такая ошибка
происходит в случае использования
операторов HIGH и DOWN с перемещаемыми
символами или, если Вы ссылаетесь в
директивах DB на перемещаемые символы.
Операнд
ссылается на перемещаемый символ,
который не был определен в сегментах
CODE или DATA.
Операнд
ссылается на процедуру EXTRN или функцию
EXTRN со смещением, например CALL SortProc+8.

Соседние файлы в предмете [НЕСОРТИРОВАННОЕ]

Источник

Регистрация Войти‘;

Авторизация

Логин:

Пароль:

Запомнить меня на этом копьютере

Регистрация
Забыли свой пароль?

Синтаксис языка
Типы данных
Стандартные модули
Процедуры и функции
Зарезервированные слова
Директивы компилятора
Сообщения об ошибках
- Ошибки выполнения
- Ошибки компиляции
Примеры программ
Описание среды разработки

Главная / Справочник / Сообщения об ошибках / Ошибки компиляции

Ожидается BEGIN.

Описание

Здесь должен быть BEGIN, или есть ошибка в структуре блоков модуля или программы.

ISBIZ.agency
продвижение сайта

Источник

Правила раздела!

1. Заголовок или название темы должно быть информативным !
2. Все тексты фрагментов программ должны помещаться в теги [code] … [/code] или [code=pas] … [/code].
3. Прежде чем задавать вопрос, см. «FAQ» и используйте ПОИСК !
4. НЕ используйте форум для личного общения!
5. Самое главное — это раздел теоретический, т.е. никаких задач и программ (за исключением небольших фрагментов) — для этого есть отдельный раздел!

Что означает этот Error, что значит «Error 36: BEGIN experced

	11.11.2006 4:20 Сообщение #1
Группа: Пользователи Сообщений: 6 Пол: Мужской Реальное имя: pavel Репутация: 0	когда я набирая код программы и нажимаю Run у меня снизу появляется строка «Error 36: Begin expected» чё делать? есль кто знает чё делать или ссылка есть то пишите!

volvo	11.11.2006 4:27 Сообщение #2
Гость	Значит, у тебя не хватает Begin в программе. Например, вот такая программа выдаст ошибку №36: program test; procedure P1; begin end; end. потому, что нет начала основного блока программы, а он должен быть… Хочешь подробнее — приводи программу, я перенесу тему в «Задачи»…

lcover	11.11.2006 4: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 5:59 Сообщение #4
Гость	Цитата чё сдесь нитак? Для того, чтобы знать это надо знать, что программа ДОЛЖНА делать… Она компилируется без проблем (если точку в конце поставить), но работать будет вряд ли. Что еще можно сказать?

Bokul	11.11.2006 6:53 Сообщение #5
Гуру Группа: Пользователи Сообщений: 1 117 Пол: Мужской Реальное имя: Богдан Репутация: 11	Цитата Код assign(fin,’С:WindowsSystem32configSAM’); После двоеточия надо поставить «» и потом каждый раз когда ты переходишь к «нижней» папке, т.е., наверное, должно быть С:WindowsSystem32config.SAM Тоже самое и с Цитата и Цитата Код assign(fout,’C:SYSTEMfi’) Цитата Код assign(fin,’С:WindowsSystem32configSYSTEM’); Сообщение отредактировано: Bokul — 11.11.2006 6:55 ——————— Лао-Цзы : Знать много и не выставлять себя знающим есть нравственная высота. Знать мало и выставлять себя знающим есть болезнь. Только понимая эту болезнь, мы можем избавиться от нее.

lcover

сообщение 11.11.2006 16:41

Сообщение
#6

Группа: Пользователи
Сообщений: 6
Пол: Мужской
Реальное имя: pavel

Репутация: 0

сапосибо конечно , теперь учту свои ошибки, но прога явно не будет работать , поставил там где сказали но опять error 36
наверно надо подучить узык и самим чего-нить попробувать
т.е. эту прогу не я написал , мой друг у знакомого какова-то нашёл, но после того как его братишка поизучал програму , друг прислал мне вот эти остатки без begin’ов и и кто знает чево там ещё нехватает((

эта программа как мне сказали должна просто скопировать из C:WindowsSystem32config скопировать на C: файлы SAM и SYSTEM
если кто может дать подробную инфу то пожалуйста предлогайте или у кого-нить есть такая програма , вопщем я ещё несовсем орентируюсь в Tutbo Paskal’e но мне нужна такая програма которая это сделает.

Цитата

Tutbo Paskal

Интересно бы еще узнать что это такое …

Сообщение отредактировано: klem4 — 11.11.2006 16:45

Оффлайн Профиль

К началу страницы

Ответить

lcover	11.11.2006 17:10 Сообщение #7
Группа: Пользователи Сообщений: 6 Пол: Мужской Реальное имя: pavel Репутация: 0	Цитата(Модератор какой-то @ 11.11.2006 11:41) Интересно бы еще узнать что это такое Turbo Paskal это программа у меня так называется, в которой я работаю

volvo	11.11.2006 17:28 Сообщение #8
Гость	Turbo Pas k al ? Цитата эта программа как мне сказали должна просто скопировать из C:WindowsSystem32config скопировать на C: файлы SAM и SYSTEM Это в принципе проблематично… Не говоря о том, что приложения для работы под Windows надо создавать на компиляторе, который предназначен для написания Windows, а не DOS приложений, так еще у тебя может просто не хватить прав для работы с этими файлами.

lcover	11.11.2006 17:46 Сообщение #9
Группа: Пользователи Сообщений: 6 Пол: Мужской Реальное имя: pavel Репутация: 0	Цитата(volvo @ 11.11.2006 12:28) Turbo Pas k al ? Это в принципе проблематично… Не говоря о том, что приложения для работы под Windows надо создавать на компиляторе, который предназначен для написания Windows, а не DOS приложений, так еще у тебя может просто не хватить прав для работы с этими файлами. извеняюсь за неграмотность я имел ввиду TURBO PASCAL я бы нестал искать такую программу если бы у меня были бы права , я бы их без программы скопировал бы, просто говорят что можно накатать програму и шоп она скопировала , типа так можно, я кароче попробувал но у меня ничё неполучается но у меня проблема в том что это не только в этой программе , я брал с форума тут и другие но и там получается Error 36 можт скажет кто мошт там надо ещё что-то дабовлять или чё? у всех работает а у меня нет Сообщение отредактировано: lcover — 11.11.2006 17:50

volvo	13.11.2006 21:55 Сообщение #10
Гость	Цитата говорят что можно накатать програму и шоп она скопировала Можно… Только не в 10 строк, а раз в 15-20 подлиннее, и не под TP, а по крайней мере под FPC/Delphi … Это во-первых. А во-вторых, тебе не кажется, что делать то, что Windows тебе не позволяет — это есть хак? А здесь, извини, не форум хакеров… Закрыто.

1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)

Пользователей: 0

500Gb HDD, 6Gb RAM, 2 Cores, 7 EUR в месяц — такие хостинги правда бывают

Связь с администрацией: bu_gen в домене octagram.name

Источник

№ п/п Код и название ошибки Характеристика ошибки Пояснение

Error 1: Out of memory

Нехватка памяти

Это сообщение выводится, когда компилятору не хватает памяти

Error 2: Identifier expected

Ожидался идентификатор

Возможно, имя вашего идентификатора совпадает со служебным словом

Error 3: Unknown identifier

Неизвестный идентификатор

Этот идентификатор не был описан

Error 4: Duplicate identifier

Идентификатор продублирован

Этот идентификатор уже исполь-зовался в текущем блоке программы

Error 5: Syntax error

Синтаксическая ошибка

В тексте найден неправильный символ

Error 6: Error in real constant

Ошибка в константе действительного типа

Возможно, вы поставили десятичную запятую вместо десятичной точки

Error 7: Error in integer constant

Ошибка в константе целого типа

Константы, выходящие за пределы диапазона типа longint описы-ваются как действительные числа

Error 10: Unexpec—ted end of file

Неожиданный конец файла

Количество операторов Begin и End не сбалансирована

Error 11: Line too long

Строка слишком длинная

Длина строки не должна превышать 127 символов

Error 12: Type identifier expected

Ожидается иденти-фикатор типа

Этот идентификатор не обозначает тип, как это должно быть

Error 15: File not found

Файл не найден

Файл не был найден ни в текущем каталоге, ни в других каталогах

Error 20: Variable identifier expected

Ожидается идентификатор переменной

Этот идентификатор не обозначает переменной, как должен был

Error 21: Error in type

Ошибка в типе

Этот символ не может начинать описание типа

№ п/п Код и название ошибки Характеристика ошибки Пояснение

Error 25: Invalid string length

Неправильная длина строки

Описанная максимальная длина строки должна быть в диапазоне 1…255

Error 26: Type mismatch

Несоответствие типов

Несовместимые типы переменной и выражения в операторе присваива-ния, несовместимые типы операн-дов в выражении, несовместимые типы формальных и фактических параметров в вызванной подпрограмме

Error 31: Constant expected

Ожидается константа

Error 32: Integer or real constant expected

Ожидается целая или действительная константа

Error 34: Invalid function result type

Неправильный тип результата функции

Правильными типами результата функции являются все простые типы

Error 36: BEGIN expected

Ожидается оператор Begin

Error 37: END expected

Ожидается оператор End

Error 38: Integer expression expected

Ожидается целое выражение

Предыдущее выражение должно быть целого типа

Error 41: Operand types do not match operator

Типы операндов не отвечают оператору

Оператор не может быть применён к операндам указанного типа

Error 42: Error in expression

Ошибка в выражении

Этот символ не может присутствовать в выражении

Error 50: DO expected

Ожидается служебное слово do

Error 54: Of expected

Ожидается служебное слово of

Error 57: THEN expected

Ожидается служеб-ное слово Then

№ п/п Код и название ошибки Характеристика ошибки Пояснение

Error 58: TO or DOWNTO expected

Ожидается служеб-ное слово to или downto

Error 62: Division by zero

Деление на нуль

Предыдущая операция пытается выполнить деление на нуль

Error 92: «[» or «(.» expected

Тут должна быть открывающая квадратная скобка

Вместо открывающей квадратной скобки можно использовать «(.»

Error 93: «]» or «).» expected

Квадратные скобки не закрыты

Вместо закрывающей квадратной скобки можно использовать «).»

Error 98: Integer variable expected

Ожидается переменная целого типа

Error 103: Integer or real variable expected

Ожидается пере-менная целого или вещественного типа

Error 108: Over—flow in arithmetic operation

Переполнение в арифметической операции

Результат предыдущей операции выходит за пределы использованного типа данных.

Error 113: Error in statement

Ошибка в операторе

Оператор не может начинаться с этого символа

Источник

СООБЩЕНИЯ КОМПИЛЯТОРА ОБ ОШИБКАХ

1 Out of memory Выход за границы памяти Компилятор выполняется вне допустимых границ памяти. Имеется ряд возможных решений проблемы:

§ Если в меню Options?Linker?Link Buffer, установлен параметр Memory, переключите его в значение Disk.

§ Возможно программа слишком велика, чтобы компилироваться в таком объеме памяти. Следует разбить ее на два или более модуля.

2 Identifier expected Не указан идентификатор В этом месте должен находиться идентификатор. 3 Unknown identifier Неизвестный идентификатор Этот идентификатор не был описан. 4 Duplicate identifier Повторный идентификатор Идентификатор уже представляет имя программы, модуля, константы, переменной, типа, процедуры и функции, описанных в текущем блоке. 5 Syntax error Синтаксическая ошибка В исходном тексте найден неверный символ. 6 Error in real constant Ошибка в вещественной константе 7 Error in integer constant Ошибка в целой константе 8 String constant exceeds line Строковая константа превышает размеры строки Вероятно, отсутствует кавычка в конце строковой константы. 10 Unexpected end of file Неожиданный конец файла Причины:

§ несоответствующее количество begin и end (не забудьте, что оператор case также заканчивается словом end);

§ включаемый файл заканчивается в середине раздела операторов. Каждый раздел операторов должен целиком помещаться в одном файле;

§ незаконченный комментарий.

11 Line too long Строка слишком длинная Максимальная длина строки может равняться 126 символам. Возможно, отсутствует апостроф в конце строковой константы. 12 Type identifier expected Нужен идентификатор типа Не указан типа идентификатора, как это должно быть. 13 Too many open files Слишком много открытых файлов Файл CONFIG.SYS не содержит параметра FILES=xx или этот параметр указывает слишком много файлов. Следует увеличить число файлов. 14 Invalid file name Неверное имя файла Имя файла неверно или указывает несуществующий путь. 15 File not found Файл не найден Файл не может быть найден ни в текущем каталоге, ни в каком-либо другом исследуемом каталоге, предназначенном для этого типа файлов. 16 Disk full Диск заполнен Удалите некоторые файлы или воспользуйтесь новым диском (если речь идет о сменном носителе). 17 Invalid compiler directive Неправильная директива компилятора Возможно, неверная буква в директиве компилятора, один из параметров директивы компилятора неверный или используется глобальная директива компилятора, когда компиляция тела программы уже началась. 18 Too many files Слишком много файлов В компиляции программы или программного модуля участвует слишком много файлов. Следует объединить включаемые файлы или сделать короче имена файлов. 19 Undefined type in pointer definition Неопределенный тип в определении ссылки Была осуществлена ссылка на тип в приведенном ранее описании указателя, но этот тип не был описан. 20 Variable identifier expected Нужен идентификатор переменной Идентификатор не описывает переменную, как это должно быть. 21 Error in type Ошибка в определении типа Определение типа не может начинаться с этого символа. 22 Structure too large Слишком большая структура Максимально допустимый размер структурного типа 65 535 байт. 23 Set base type of range Базовый тип множества выходит за допустимые границы Базовый тип множества должен представлять собой отрезок типа с границами в пределах от 0 до 255 или перечислимого типа, допускающим не более чем 256 значений. 24 File components may not be files or objects Элементы файла не могут быть файлами или объектами Тип компоненты файлового типа не может быть объектным или файловым типом и не может быть структурным типом с компонентами файлового или объектного типа: конструкции file of file или file of object не допускаются. 25 Invalid string length Неверная длина строки Длина строки должна находиться в диапазоне от 1 до 255. 26 Type mismatch Несоответствие типов Причины:

§ несовместимые типы переменной и выражения в операторе присваивания;

§ несовместимые типы фактического и формального параметров в обращении к процедуре или функции;

§ тип выражения, несовместимый с типом индекса при индексировании массива;

§ несовместимые типы операндов в выражении.

27 Invalid subrange base type Неправильный базовый тип интервального типа Допустимыми являются все порядковые типы. 28 Lower bound greater than upper bound Нижняя граница больше верхней В описании диапазона нижняя граница больше, чем верхняя. 29 Ordinal type expected Нужен порядковый тип Вещественные, строковые, структурные и ссылочные типы в данном случае не допускаются. 30 Integer constant expected Нужна целая константа 31 Constant expected Нужна константа 32 Integer or real constant expected Нужна целая или вещественная константа 33 Pointer type identifier expected Нужен идентификатор типа указателя Данный идентификатор не обозначает тип указателя, как это требуется. 34 Invalid function result type Неправильный тип результата функции Правильными типами результата функции являются все простые типы, а также строковые и ссылочные типы. 35 Label identifier expected Нужен идентификатор метки Метка не обозначена с помощью идентификатора, как это требуется. 36 BEGIN expected Нужен BEGIN 37 END expected Нужен END Следует проверить соответствие ключевых слов BEGIN и END. 38 Integer expression expected Нужно выражение типа INTEGER Предыдущее выражение должно иметь целочисленный тип INTEGER 39 Ordinal expression expected Нужно выражение порядкового типа Предшествующее выражение должно иметь порядковый тип. 40 Boolean expression expected Нужно выражение типа BOOLEAN Предшествующее выражение должно иметь тип BOOLEAN 41 Operand types do not math operator Типы операндов не соответствуют оператору Данный оператор не может быть применен к операндам этого типа, например, нельзя ‘A’ разделить на ‘2’. 42 Error in expression Ошибка в выражении Данный идентификатор не может участвовать в выражении указанным образом. 43 Illegal assignment Неверное присваивание § Нетипизированным файлам и переменным нельзя присваивать значения.

§ Идентификатору функции можно присваивать значения только внутри раздела операторов данной функции.

44 Field identifier expected Нужен идентификатор поля Данный идентификатор не является полем предшествующей переменной типа «запись». 45 Object file too large Объектный файл слишком большой Нельзя компоновать файлы .obj, превышающие 64 Кбайт. 46 Undefined external Не определена внешняя процедура Внешняя процедура или функция не имеет соответствующего определения Public в объектном файле. Убедитесь, что вы указали все объектные файлы в директивах {$L имя_файла}, и проверьте написание идентификаторов процедуры или функции в файле .asm. 47 Invalid object file record Неправильная запись объектного файла Файл .obj содержит неверную объектную запись. Убедитесь, что данный файл является действительно файлом .obj. 48 Code segment too large Сегмент кода слишком большой Максимальный размер кода программы или программного модуля равняется 65 520 байт. Если вы компилируете программный модуль, разбейте его на два или более программных модулей. 49 Data segment too large Сегмент данных слишком велик Максимальный размер сегмента данных равен 65 520 байт, включая данные, описываемые используемыми программными модулями. Если вам нужно большее количество глобальных данных, опишите большие структуры с помощью указателей и выделяйте для них память динамически с помощью процедуры New. 50 DO expected Нужен оператор DO 51 Invalid PUBLIC definition Неверное определение PUBLIC § Две или более директивы PUBLIC на языке ассемблера определяют один и тот же идентификатор.

§ Объектный файл .obj определяет идентификаторы PUBLIC, которые не находятся в сегменте CODE.

52 Invalid EXTRN definition Неверное определение EXTRN § На идентификатор имеется ссылка в директиве EXTRN на языке ассемблера, но он не описан в программе или модуле на Паскале или в интерфейсной части какого-либо из используемых модулей.

§ Идентификатор обозначает абсолютную переменную.

§ Идентификатор обозначает процедуру или функцию типа inline.

53 Too many EXTRN definition Слишком много определений EXTRN Невозможно обработать файлы .obj, если имеется более чем 256 EXTRN. 54 OF expected Требуется OF 55 INTERFACE expected Требуется интерфейсный раздел 56 Invalid relocatable reference Недопустимая перемещаемая ссылка § Файл .obj содержит данные и перемещаемые ссылки в сегментах, отличных от CODE. Например, вы пытаетесь описать инициализированные переменные в сегменте DATA.

§ Файл .com содержит ссылки с размерами в байтах на перемещаемые идентификаторы. Такая ошибка происходит в случае, если вы используете операторы HIGH и DOWN с перемещаемыми идентификаторами или если вы ссылаетесь в директивах DB на перемещаемые идентификаторы.

§ Операнд ссылается на перемещаемый идентификатор, который не был определен в сегменте CODE или в сегменте DATA.

§ Операнд ссылается на процедуру EXTRN или функцию EXTRN со смещением, например CALL SortProc+8.

57 Then expected Требуется THEN В нужном месте отсутствует слово then. 58 TO or DOWNTO expected Требуется TO или DOWNTO В нужном месте отсутствует ключевое слово TO или DOWNTO. 59 Undefined forward Не определено опережающее описание § Процедура или функция были описаны в интерфейсном разделе программного модуля, но их определение отсутствует в разделе реализации.

§ Процедуры или функции были описаны с помощью описания forward, но их определение не найдено.

61 Invalid typecast Неверное преобразование типа § Размеры ссылки на переменную и тип результата отличаются друг от друга при изменении типа переменной.

§ Вы пытаетесь осуществить приведение типа выражения, когда разрешается только ссылка на переменную, процедуру или функцию.

62 Division by zero Деление на нуль Предшествующая операция пытается выполнить деление на нуль. 63 Invalid file type Неверный файловый тип Данный файловый тип не обслуживается процедурой обработки файлов. Например, вы пытаетесь использовать процедуру Readln для типизированного файла или процедуру Seek для текстового. 64 Cannot Read or Write variables of this type Нельзя считать или записать переменные данного типа Процедуры Read и Readln могут считывать переменные символьного, целого, вещественного и строкового типа. 65 Pointer variable expected Нужно использовать переменную-указатель Предыдущая переменная должна иметь тип «указатель». 66 String variable expected Нужна строковая переменная Предшествующая переменная должна иметь строковый тип. 67 String expression expected Нужно выражение строкового типа Предшествующее выражение должно иметь строковый тип. 68 Circular unit reference Циклическая ссылка на модуль Два модуля не могут ссылаться друг на друга в разделе interface, но могут это делать в разделе implementation. Переупорядочите операторы uses таким образом, чтобы циклические ссылки имели место только в разделе implementation. 69 Unit name mismatch Несоответствие имен программных модулей Имя программного модуля, найденное в файле .tpu, не соответствует имени, указанному в операторе uses. 70 Unit version mismatch Несоответствие версий программных модулей Один или несколько программных модулей, используемых данной программой, были изменены после их компиляции. Воспользуйтесь командой Compile?Make или Compile?Build в интегрированной интерактивной среде программирования, что позволит автоматически скомпилировать программные модули, нуждающиеся в перекомпиляции. 71 Internal stack overflow Переполнение внутреннего стека Внутренний стек компилятора исчерпан из-за слишком большого уровня вложенности операторов. Переорганизуйте исходный код и уменьшите уровень вложенности. Например, переместите внутренние уровни вложенных операторов в отдельную процедуру. 72 Unit file format error Ошибка формата файла программного модуля Файле .tpu является недействительным. Возможно, он создан с помощью старой версии Turbo Pascal или Borland Pascal. В этом случае нужно перекомпилировать исходный код модуля и создать новый модуль. 73 Implementation expected Требуется раздел реализации Ключевое слово Implementation отсутствует там, где оно должно быть. Возможно, вы включили реализацию процедуры, функции или метода в интерфейсную часть модуля. 74 Constant and case types do not math Типы констант и выражения оператора Case не соответствуют друг другу Тип константы оператора Case несовместим с выражением селектора в операторе выбора 75 Record variable expected Нужна переменная типа запись Предшествующая переменная должна иметь тип «запись». 76 Constant out of range Константа выходит за допустимые границы § Вы пытаетесь указать массив с константами, нарушающими границы.

§ Вы пытаетесь присвоить константу вне диапазона переменной.

§ Вы пытаетесь передать константу вне диапазона в качестве параметра процедуре или функции.

77 File variable expected Нужна файловая переменная Предшествующая переменная должна иметь файловый тип. 78 Pointer expression expected Нужно выражение типа указатель Предшествующая переменная должна иметь ссылочный тип. 79 Integer or real expression expected Нужно выражение типа real или integer Предшествующее выражение должно иметь тип real или integer. 80 Label not within current block Метка не находится внутри текущего блока Оператор goto не может ссылаться на метку, находящуюся вне текущего блока. 81 Label already defined Метка уже определена Данная метка уже помечает оператор. 82 Undefined label in processing statement part Неопределенная метка в предшествующем разделе операторов Данная метка была описана, и на нее осуществлялась ссылка в предшествующем разделе операторов, но она не определена. 83 Invalid @ argument Недействительный аргумент оператора @ Действительными аргументами являются ссылки на переменные и идентификаторы процедур или функций. 84 Unit expected Нужно ключевое слово Unit Не указано ключевое слово Unit, как это требуется. 85 «;» expected Нужно указать «;» Не указана, где это требуется, точка с запятой. 86 «:» expected Нужно указать «:» Не указана, где это требуется, двоеточие. 87 «,» expected Нужно указать «,» Не указана, где это требуется, запятая. 88 «(» expected Нужно указать «(» Не указана, где это требуется, открывающаяся круглая скобка. 89 «)» expected Нужно указать «)» Не указана, где это требуется, закрывающаяся круглая скобка. 90 «=» expected Нужно указать «=» Нужно указать знак равенства. 91 «:=» expected Нужно указать «:=» Требуется использовать операцию присваивания. 92 «[» or «(.» expected Нужно «[» or «(.» Требуется указать квадратную скобку или «(. ». 93 «]» or «.)» expected Нужно «]» or «.)» Требуется указать квадратную скобку или «.) ». 94 «.» expected Нужно «.» Требуется указать точку. Убедитесь, что тип не используется как переменная или что именем программы не переопределяется важный идентификатор другого модуля. 95 «..» expected Нужно «..» Требуется указать точки. Там, где это нужно, не указан диапазон. 96 Too many variables Слишком много переменных Общий размер глобальных переменных, описанных в программе или программном модуле, не может превышать 64 Кбайт.

Размер локальных переменных, описанных в программе или функции, не может превышать 64 Кбайт.

97 Invalid for control variable Недопустимая управляющая переменная оператора for Управляющая переменная оператора for должна быть переменной перечисляемого типа, определенной в разделе описаний текущей подпрограммы. 98 Integer variable expected Нужна переменная целого типа Предшествующая переменная должна иметь тип integer. 99 Files are not allowed here Здесь не допускаются файлы Типизированная константа не может иметь файловый тип. 100 String length mismatch Несоответствие длины Длина строковой константы не соответствует количеству элементов символьного массива. 101 Invalid ordering of fields Неверный порядок полей Поля в константе типа «запись» должны указываться в порядке их описания. 102 String constant expected Нужна константа строкового типа 103 Integer or real variable expected Нужна переменная типа integer или real Предшествующая переменная должна иметь целый или вещественный тип. 104 Character expression Ожидается символьные выражения 105 Compilation aborted Компиляция прервана 106 Error in statement Ошибка в операторе 107 Error in type Ошибка в типе 108 Expected Ожидается имя 109 Invalid floating point operation Неправильная операция для вещественных операндов 110 Ordinal variable expected Ожидается переменная целого или символьного типа 111 Too many symbols Слишком много символов 112 Undefined type Неопределенный тип 113 Abnormal program termination Ненормальное окончание программы 114 Ctrl-Break to quit нажмите CTRL и Break для входа 115 Disk is write-protected Диск защищен от записи 116 Disk read error Ошибка записи на диск 117 Disk write error Ошибка записи на диск 118 Drive not ready дисковод не готов (нет дискеты) 119 Error on execute Ошибка исполнения 120 Floating point overflow Вещественное переполнение 121 Hardware failure Ошибка оборудования 122 Heap overflow error Не хватает основной памяти 123 I/O checking Ошибка ввода/вывода 124 Invalid Breakpoint Неправильная точка останова 125 Invalid format specifier Неправильный формат 126 No debug info Не задана информация для отладки 127 Not enough memory Не хватает памяти 128 Press any key Нажмите любую клавишу 129 Program terminated Исполнение программы прекращено 130 Range check error Выход индекса за пределы массива 131 Runtime error Ошибка во время исполнения 132 Stack overflow error Ошибка по переполнению стека 133 Too many breakpoints Слишком много точек останова 134 Type EXIT to return to Turbo Pascal Введите Exit для возврата в Турбо Паскаль 135 User Break Пользователь прервал исполнение программы

Источник

Ошибка 36 предполагается begin

Сообщение компилятора об ошибках

Ошибки при компилировании

Авторизация

Описание

Правила раздела!

А вот еще интересные материалы: