PHP DM Gate v0.9 » ShortInt во FreePascal'е

TUser © (09.04.05 12:42) [0]

Почему вот эта программа в Delphi печатает
-1

, а во ФриПаскале
18446744073709551615

? Там как-то по другому устроена работа с
ShortInt

и
Byte

?

{$ifdef fpc}
{$mode delphi}
{$else}
{$apptype console}
{$endif}

program TestShortInt;

uses SysUtils;

var a: shortint;
b: byte;
begin
a:=0;
b:=255;
a:=a + b;
writeln (inttostr(a));
end.

<Цитата>
SSY (09.04.05 13:42) [1]

Ну не знаю... у меня выводит -1
(использую Лазаря, вытянутого сегодня утром).

<Цитата>
TUser © (09.04.05 14:13) [2]

Да, действительно. fpc 1.9.6 пишет правильно, а 1.9.5 - ...

<Цитата>
Anatoly Podgoretsky © (09.04.05 14:17) [3]

inttostr
b: byte;
18446744073709551615 = FFFFFFFFFFFFFFFF

<Цитата>
TUser © (09.04.05 14:30) [4]

> Anatoly Podgoretsky © (09.04.05 14:17) [3]

понятно

<Цитата>