بسم الله الرحمن الرحيم
هذا هو الدرس الثاني من شرح free pascal /lazarus
http://www.youtube.com/watch?v=tSLas4KiqVg&feature=player_embedded
وهذا هو الكود الموجود في الفيديو
program FPTutorial2;
{$mode objfpc}{$H+}
uses
{$IFDEF UNIX}{$IFDEF UseCThreads}
cthreads,
{$ENDIF}{$ENDIF}
Classes
{ you can add units after this };
begin
writeln(5 + 7);
writeln(6 - 3);
writeln(5 * 2);
writeln(10 / 2:5:2);
writeln(100/3:0:2);
writeln(5 - 2 + 3);
writeln((5 - 2) + 3);
writeln(5 - (2 + 3));
writeln;
writeln;
writeln('Press [Enter] To Quit');
readln();
end.