Не компилируется модуль: Forward declaration not solved - Pascal

Узнай цену своей работы

Формулировка задачи:

Не компилируется модуль, компилятор пишет: forward declaration not solved InA (Var d1, d2: string; Var e: boolean); и There were errors compiling module, stopping.
Unit U1;
 
Interface
Procedure InA (Var d1, d2: string; Var e: boolean);

Implementation
Procedure InA;
Var nf: string;
n, m, c, c1: integer;
dt1, dt2: string;
e: boolean;
 
Begin
e:=true;
While e=true do
 Begin
 Write('Введите первую дату: ');
 Readln(dt1);
 Write('Введите вторую дату: ');
 Readln(dt2);
 Val (dt1, n, c);
 Val (dt2, m, c1);
 If (Length(dt1)=8) and (Length(dt2)=8) then
  If (c=0) and (c1=0) then
   If n<m then
    Begin
    Writeln('Даты введены верно');
    e:=false;
    end
   Else Writeln('Даты введены неверно, повторите ввод')
  Else Writeln('Даты введены неверно, повторите ввод')
 Else Writeln('Даты введены неверно, повторите ввод')
End;
End;
end.

Решение задачи: «Не компилируется модуль: Forward declaration not solved»

textual
Листинг программы
Procedure InA (Var d1, d2: string; Var e: boolean);

Объяснение кода листинга программы

  1. Создается процедура 'InA'.
  2. Процедура принимает три параметра:
    • Переменная 'd1' типа string, передаваемая по ссылке (Var);
    • Переменная 'd2' типа string, передаваемая по ссылке (Var);
    • Переменная 'e' типа boolean, передаваемая по ссылке (Var).
  3. В процедуре выполняется определенная логика, которая, скорее всего, модифицирует значения переменных 'd1', 'd2' и 'e'.

ИИ поможет Вам:


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

Оцени полезность:

8   голосов , оценка 4.375 из 5
Похожие ответы