"True" war übrigens auch schon in Pascal gleich "1". Dies zeigt das folgende kleine Programm:
Code:
uses Crt;
var
x: Boolean;
y: Byte absolute x;
begin
ClrScr;
x := False;
WriteLn('False = ', y);
x := True;
WriteLn(' True = ', y);
WriteLn;
for y := 0 to 255 do
Write(x:5);
ReadLn;
end.
In den ersten beiden Zeilen wird "False = 0" und "True = 1" ausgegeben. Danach folgen dann ein "False" und 255 "True".