PASCAL

Legegyszerubb program:
Begin
End.

Program Hello;
Begin
Writeln('hello World!');
END.

nedit-ben szerkeszteni
menteni hello.pas neven
fpc (free pascal compiler)
fpc hello.pas
./ hello  (programinditas)

Kylix   (Delphi)
Lazarus

ADATTIPUSOK

Szamok (numerikus): egeszek: Byte (-128->+127)
Smallint
Integer(-32K->+32K)= 2bájtos
    valos: real
Szoveges: char
  string
Logikai: Boolean (true-false)


program hanyados;
var
i: Integer;
j: Integer;
k: Real;
Begin
writeln('elsoszam');
readln(i);
writeln('masodikszam');
readln(j);
k:=i/j;
writeln(k);
End.


if feltetel then felt_igaz
else feltetel hamis

Blokk: Begin
end;

program hanyados;
var
i: Integer;
j: Integer;
k: Real;
Begin
writeln('elsoszam');
readln(i);
writeln('masodikszam');
readln(j);
if (j=0) then
begin
writeln('hiba');
end
else
k:=i/j;
writeln(k:6:3);
End.