Ошибка неверное выражение pascal abc - Решение и исправление самых разных ошибок на TopOshibok.ru

program number2;
Uses
  CRT;
type
  Team = record
    Number: integer;
    Name: string[15];
    Surname: string[15];
    Patronymic: string[15];
    Year: integer;
    Month: integer;
    Date: integer;
    Points: byte;
  end;
  FOT = file of Team;
 
var
  t: Team;
  TF: FOT;
  n: byte;
  maxpo, maxpo2, maxpo3: integer;
  s: string;
  check: boolean;
 
function ToString: string;
begin
 Result:= string.Format('Number: {0},#13#10, Name: {6}, SurName: {1}, Patronymic: {2}, DOB: {5}.{4}.{3}, Number of points: {7}',
                              t.number, t.surname, t.patronymic, t.year, t.month, t.date, t.name, t.Points); 
end;
 
procedure Outputonpo(var po: integer);
begin
  Reset(TF);
  while not eof(TF) do
  begin
    read(TF, t);
    if (t.Points = po ) then
      writeln(ToString);
  end;
  Close(tf);
end;
 
begin
  check := true;
  Write('Enter name of file: ');
  ReadLn(s);
  s := 'C:\Users\Êèðèëë\Desktop\' + s + '.dat';
  Assign(TF, s);
  Rewrite(TF);
  n := 1;
  maxpo := 0;
  maxpo2 := 0;
  maxpo3 := 0;
  repeat
    t.number := n;
    Write('Enter Name:' );
    ReadLn(t.Name);
    Write('Enter SurName:' );
    ReadLn(t.Surname);
    Write('Enter Patronymic:');
    ReadLn(t.Patronymic);
    Write('Enter Year:');
    ReadLn(t.Year);
    Write('Enter Month:');
    ReadLN(t.Month);
    Write('Enter Date:');
    ReadLn(t.Date);
    Write('Enter the number of points:');
    ReadLn(t.Points);
    Write(TF, t);
    n := n + 1;
    Writeln;
    WriteLn('EXIT (y/n)?');
    ReadLn(s);
    if s = 'y' Then check := false
    else if s = 'n' then check := true;
  until check = false;
  Close(tf);
  Reset(TF);
  while not eof(TF) do
  begin
    read(TF, t);
    if t.Points > maxpo then 
      maxpo := t.Points;
  end;
  Close(tf);
  Outputonpo(maxpo);
  
  Reset(TF);
  while not eof(TF) do
  begin
    read(TF, t);
    if t.Points = maxpo then
      t.Points := 1;
    if t.Points > maxpo2 then
      maxpo2 := t.Points;
  end;  
  Close(TF);
  Outputonpo(maxpo2);
  
  Reset(TF);
  while not eof(TF) do
  begin
    read(TF, t); 
    if t.Points = maxpo then
      t.Points := 1;
    if t.Points = maxpo2 then
      t.Points := 1;
    if t.Points > maxpo3 then
      maxpo3 := t.Points;
  end;
  Close(TF);
  Outputonpo(maxpo3);
  
end.

Источник

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

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

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

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

Содержание

Ошибки и проблемы использования выражений в Pascal ABC
1. Синтаксические ошибки
2. Ошибки в вычислениях
3. Проблемы с округлением и точностью
4. Ошибки при работе с массивами и строками
5. Недостаток проверки ошибок
Заключение
Неверное использование синтаксиса
Ошибки в операторах
Некорректное написание выражений
Ошибки в типах данных
Проблемы с приоритетом операций
Отсутствие проверки на нулевое значение

Ошибки и проблемы использования выражений в Pascal ABC

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

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

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

Для исправления синтаксических ошибок рекомендуется внимательно проверять код на наличие опечаток и пропущенных символов. Также полезно использовать отступы и разрывы строк для улучшения читабельности кода.

2. Ошибки в вычислениях

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

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

3. Проблемы с округлением и точностью

Использование операций с плавающей точкой может привести к проблемам с округлением и точностью вычислений.

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

4. Ошибки при работе с массивами и строками

При работе с массивами и строками могут возникать ошибки, связанные с неправильным обращением к элементам массива или символам строки.

Для предотвращения таких ошибок необходимо внимательно следить за индексами и длинами массивов и строк. Также полезно использовать встроенные функции и процедуры для работы с массивами и строками, чтобы избежать некорректного доступа к данным.

5. Недостаток проверки ошибок

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

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

Заключение

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

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

Синтаксис – это правила, которые определяют правильную структуру и порядок написания кода в языке программирования. Неверное использование синтаксиса может привести к ошибкам при компиляции и выполнении программы.

Ошибки в использовании синтаксиса в языке Pascal ABC могут включать в себя:

Отсутствие точки с запятой в конце выражения:

var
a: Integer
b: Integer;
begin
a := 5;
b := 10;

Отсутствие ключевых слов или операторов:

begin
writeln('Привет, мир!');
end;

Неправильное использование скобок:

var
a: Integer;
b: Integer;
begin
a := (5 + b;
end;

Неправильное использование операторов и переменных:

var
a: Integer;
begin
a = 5;
writeln(a);
end;

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

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

При работе с выражениями в Pascal ABC могут возникать различные ошибки в операторах. Рассмотрим некоторые из них:

Несоответствие типов данных: Одним из наиболее распространенных видов ошибок является несоответствие типов данных при использовании операторов. Например, попытка сложить две переменные разных типов может привести к ошибке компиляции.
Деление на ноль: При делении числа на ноль возникает ошибка выполнения программы. Чтобы избежать этой ошибки, следует предусмотреть проверку делителя на ноль перед выполнением операции.
Обращение к несуществующему элементу массива: Если при обращении к элементу массива указан неверный индекс (например, индекс больше размера массива), то возникает ошибка выполнения программы. Необходимо убедиться, что индекс находится в допустимых пределах.
Неправильное использование логических операторов: Ошибки могут возникать при неправильном использовании логических операторов (например, использование оператора «и» вместо оператора «или»). Это может привести к некорректным результатам выражения.

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

Некорректное написание выражений

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

Ошибки в выражениях могут происходить по разным причинам. Рассмотрим некоторые из них:

Отсутствие оператора присваивания: Если арифметическое выражение не присваивается никакой переменной, то оно становится бесполезным. Например, следующее выражение является некорректным:
```
2 + 3;
```
Здесь результат будет вычислен, но никуда не будет записан. Для исправления этой ошибки нужно присвоить переменной результат выражения:
```
result := 2 + 3;
```
Использование необъявленной переменной: Переменная должна быть объявлена перед ее использованием. Если переменная не объявлена, компилятор выдаст ошибку. Например:
```
var
x: Integer;
begin
y := 5;
end.
```
Здесь переменная «y» не объявлена, поэтому компилятор выдаст ошибку.
Неправильная расстановка скобок: Правильная расстановка скобок в выражениях очень важна. Неправильная расстановка скобок может привести к некорректному поведению программы или ошибкам компиляции. Например:
```
x := (2 + 3) * 4;
```
Здесь скобки расставлены правильно и выражение будет вычислено корректно.
Неправильный порядок операций: При написании выражений важно учитывать правильный порядок операций. Например, в выражении «2 + 3 * 4» операция умножения выполнится раньше сложения, поэтому результатом будет 14.
```
x := 2 + 3 * 4;
```
Если нужно, чтобы сложение было выполнено раньше, нужно использовать скобки:
```
x := (2 + 3) * 4;
```

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

Ошибки в типах данных

Ошибки в типах данных – одна из наиболее распространенных ошибок при использовании выражений в Pascal ABC. Неправильное использование типов данных может привести к непредсказуемым результатам выполнения программы или даже к ее полному сбою.

Ниже приведены некоторые распространенные ошибки, связанные с типами данных:

Несовместимость типов данных в выражении. К примеру, попытка сложить число с текстом или выполнить другую операцию между значениями разных типов.
Превышение максимального значения переменной. Если использовать значение, которое выходит за пределы диапазона, заданного типом данных переменной, то это приведет к ошибке.
Некорректное преобразование типов. Значение одного типа данных нельзя просто так присвоить переменной другого типа. Необходимо выполнить явное преобразование с помощью специальных функций.
Необъявленные или неинициализированные переменные. Если использовать переменную, которая не была объявлена или не была инициализирована, то это может вызвать ошибку.
Ошибки при работе с символьными данными. Неправильное присваивание символа переменной, неправильное сравнение символов или неправильное использование функций работы со строками могут привести к ошибкам.

Для избежания ошибок в типах данных следует внимательно следить за типами переменных при объявлении и использовании, делать явное преобразование типов при необходимости и проверять корректность вводимых данных. Также полезно использовать функции и процедуры, предоставляемые самим языком Pascal ABC, для работы со строками, символами и числами, что поможет избежать большинства ошибок связанных с типами данных.

Проблемы с приоритетом операций

Приоритет операций — это порядок, в котором выполняются различные операции в выражениях. Неправильное понимание приоритета операций может привести к ошибкам в логике программы и получению неверных результатов. Рассмотрим несколько примеров проблем, связанных с приоритетом операций в языке Pascal ABC.

Проблема 1: сложение и умножение

Операции сложения и умножения имеют разный приоритет. Например, в выражении 5 + 3 * 2, сначала будет выполнено умножение, а затем сложение. Таким образом, результат будет равен 5 + (3 * 2) = 11.

Однако, если использовать скобки для изменения порядка выполнения операций и записать выражение так: (5 + 3) * 2, то сначала будет выполнено сложение в скобках, а затем умножение. Результат будет равен (5 + 3) * 2 = 16.

Проблема 2: присваивание и сравнение

Операторы присваивания и сравнения также имеют разный приоритет. Например, в выражении x = 5 + 3, сначала будет выполнено сложение, а затем произойдет сравнение. Таким образом, результатом выражения будет x = 8.

Однако, если нужно присвоить переменной значение сразу после сравнения, необходимо использовать скобки, чтобы изменить порядок выполнения операций. Выражение должно быть записано так: (x = 5) + 3. В этом случае, сначала будет выполнено сравнение, результатом которого будет либо 1 (если x = 5), либо 0 (если x ≠ 5), а затем будет выполнено сложение: (x = 5) + 3.

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

Отсутствие проверки на нулевое значение

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

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

Отсутствие проверки на нулевое значение может привести к ошибке деления на ноль или вызвать другие арифметические ошибки. Например, если переменная используется в выражении типа:

a := b / c;

где переменная c может принимать значение 0, то при отсутствии проверки на ноль произойдет деление на ноль, что приведет к аварийному завершению программы.

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

if c <> 0 then
a := b / c
else
writeln('Error: c cannot be zero');

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

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

Источник

program test;
var
  myfile: text;
begin
  assign(myfile, "test1.txt");//Здесь ошибка
  close(myfile);
end.

Текст ошибки: «Ошибка: неверное выражение».
Pascal abc, в интернете ничего не нашёл.
Помогите

задан 12 янв 2013 в 12:37

Не верное определение типа

var
  myfile: text;

Должно быть textfile

ответ дан 12 янв 2013 в 12:40

RsecomuaRsecomua

4,26313 серебряных знаков17 бронзовых знаков

Все, разобрался. Нужны не двойные кавычки, а обычные. Т.е. ‘test1.txt’

ответ дан 12 янв 2013 в 12:42

RoanRoan

3975 серебряных знаков17 бронзовых знаков

Источник

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

Пользователь прервал исполнение программы

Источник

program asd;
var a ,s ,d ,f ,z ,x ,c ,v :integer;
begin
   writeln('введите 4 целых числа');
   readln(a ,s ,d ,f);
   if (a<s) then begin 
                   z:=s;
                   x:=a;
                 end
            else begin 
                   z:=a;
                   x:=s;
                 end;
   if (d<f) then begin
                    c:=f;
                    v:=d;
                 end
             else begin 
                    c:=d;
                    v:=f;
                  end;
   if (z<c) then writeln('больше', c)
            else writeln('больше', z);
   if (x<v) then writeln('меньше', x)
            else writeln('меньше', v);
end.

Источник