Basic <-> Object Pascal | Explicit konverzió 16bites egészre
Basic Használt kulcsszavak: cint
CInt
Leírás
CInt (expr)Bemenet
- expr - Bármi
Kimenet
- return - 16bites egész
Példaprogramok
Basic
Explicit konverzió 16bites egészre lehetséges használata:xmin = -32768
ymax = 32767
Dim x As integer= -1234 ' x = -1234
Dim y As integer= -(1500 mod 60)' y = -25
y = CInt((x * y)) ' z = 30850.
Object Pascal Használt kulcsszavak: smallint
smallint
Leírás
smallint (expr)Bemenet
- expr - Bármi
Kimenet
- return - 16bites egész
Példaprogramok
Object Pascal
Explicit konverzió 16bites egészre lehetséges használata:xmin := -32768; ymax := 32767;
x:= -1234; // x = -1234
y:= -(1500 mod 60);// y = -25
y := smallint((x * y)); // z = 30850Megtalálható a következő gyűjteményekben: Explicit típus konverziók
Explicit konverzió 16bites egészre más programozási nyelven:
Különbségek: