Простите за баян, но очень нужно

Уважаемые разработчики,

Помогите пожалуйста студентке. Нужно выполнить несколько простецких лаб - но, у меня, видимо, проблемы с компилятором: ругается 113й ошибкой на "procedure", "MMatrix".. в общем, на имена и операторы функций, которые должны нормально выполняться. Выложите, пожалуйста, или киньте ссылку на рабочую версию компилятора. Turbo Pascal или Delphi - не принципиально.


Заранее большое спасибо всем откликнувшимся!

Чо за ошибка-то? Где цитата? Интересно жеж!

Цитата (Neverova):

ссылка

http://lazarus.freepascal.org/ как вариант

С Lazarus на 7ке 64-битной при запуске пишет "Проект успешно собран." потом "Ошибка отладчика".

unit Unit1;

interface

uses crt;
var
a:array [1..100,1..100] of real;
i,j,n:integer;
max:real;
IMPLEMENTATION
begin
clrscr;
max:=-10000000;
writeln ('enter the dimension of the matrix');
//задать размеры матрицы;
readln (n);
for i:=1 to n do
for j:=1 to n do begin
writeln ('a[',i,',',j,']');
readln (a[i,j]);
end;
for i:=1 to n do
for j:=i to n do begin
if a[i,j]>max then max:=a[i,j];
end;
for i:=1 to n do Begin
for j:=1 to n do
write (a[i,j]:8:2);
Writeln;
end;
writeln ('max element=',max:8:2);
readln
end.

program project1;

{$mode objfpc}{$H+}

uses
{$IFDEF UNIX}{$IFDEF UseCThreads}
cthreads,
{$ENDIF}{$ENDIF}
Interfaces, // this includes the LCL widgetset
Forms, Unit1
{ you can add units after this };

{$R *.res}

begin
Application.Initialize;
Application.Run;
end.

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

подскажи пожалуйста, как его создать?

как в лазаре это сделать я не помню уже. наверно надо поискать в окошке, которое появляется после нажатия Файл-Новое.