1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
|
class EXAMPLE1
--
-- To start with NUMBERs, just compile an run it :
--
-- compile -o example1 -boost example1
--
creation make
feature
make is
local
max, n1, n2: NUMBER
do
max := Maximum_integer.to_number
io.put_string("[
The maximum integer value on this architecture is:
max =
]")
io.put_number(max)
io.put_string("%Nmax + max = ")
io.put_number(max + max)
io.put_string("%Nmax * max = ")
io.put_number(max * max)
io.put_string("[
Do you like NUMBERs ?
So have a look at NUMBERs division:
]")
n1 := (2).to_number
n2 := (6).to_number
io.put_string("Assume n1 = ")
io.put_number(n1)
io.put_string(" and n2 = ")
io.put_number(n2)
io.put_string(" then n1/n2 = ")
io.put_number(n1 / n2)
io.put_string("[
With NUMBER, you always get the exact result.
Do you like NUMBERs ?
Have a look at example #2 to know more about NUMBERs
]")
end
end -- EXAMPLE1
|
