Ошибка "Fatal: Syntax error, "BEGIN" expected but "END" found" - Free Pascal
Формулировка задачи:
Ввожу
Выдает ошибку
Компиляция проекта, цель: project1.exe: Код завершения 1, ошибок: 2
unit1.pas(37,9) Error: Illegal expression
unit1.pas(41,1) Fatal: Syntax error, "BEGIN" expected but "END" found
Помогите, меня загнала эта ошибка в ступор.
unit Unit1; {$mode objfpc}{$H+} interface uses Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, Windows; var x, y, z, u, xy, xz: integer; type { TForm1 } TForm1 = class(TForm) procedure FormCreate(Sender: TObject); private public end; var Form1: TForm1; implementation {$R *.lfm} { TForm1 } procedure TForm1.FormCreate(Sender: TObject); procedure Muving; //Движение begin x:=x+xy; y:=y+xz; z=z+xy; u:=u+xz; end; end.
Решение задачи: «Ошибка "Fatal: Syntax error, "BEGIN" expected but "END" found"»
textual
Листинг программы
var Form1: TForm1; x, y, z, u, xy, xz: integer; implementation {$R *.lfm} { TForm1 } procedure Muving; //Движение begin x:=x+xy; y:=y+xz; z:=z+xy; u:=u+xz; end; procedure TForm1.FormCreate(Sender: TObject); begin Muving; end;
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д