World: r3wp

basically c input

it inputs a vallue for a varriable

ok.

this >> is input and << is output

yeah.. I don't use the C++ console ops a lot, I do C mainly.

but here goes...

n: to-integer ask "enter a number"
if  n < 0  [quit/return 1]
sum: 0
i: 0
while [ i <= n ] [ sum: sum + probe (i * i)  i: i + 1]
print sum

basically when you have cin>>n it awaits a vallue to be inputted 
in the console window

rebol returns 0 by default when you are the end of a script... so 
no need to add it at the end.

aha

ok so i just dont understand 2 lines of the code

sum:0

i:0

note, I added a little probe which prints the value at each step.


I did this to show you one powerfull aspect of REBOL... you can insert 
functions like *chains*

wow

the probe actually is transparent and returns the value it received 
while printing it.

alemar, in rebol, the assignment is done via :, not =

aaa like delphi

i get it

hmm, delphi uses :=, IIRC? But I might be confused by CA Visual OBjects 
I used in the past :-)

just a few functions don't return values (like print) in this case 
you will get an error, but the error should give you clues

well in delphi you define a value by := and : only explaines the 
type (boolean,integer..

aha gr8

that's one powerful aspect of REBOL: it figures out the type on its 
own, mostly.

trying to compile the code now but the compiler from the site is 
a bit tricky

** Script error: n has no value
** Where: while
** Near: while [i <= n] [sum: sum + probe (i * i) i: i + 1]

:D

ok is the Near error a syntax error in the cycle?

the main difference in REBOL is that everything you can manipulate 
is a value, even functions and objects don't have a special syntax 
to use... they are values just like anything else.

there is no compiler...

hehehe... if you paste it directly in the console, the ask will intepret 
the next line as the answer  ;-)

then what am i using :D

:-)

so it triggers an error and n is never assigned any value  ;-)

yeah exctly i understood that

alemar - rebol is an interpreter ...

for the console, just replace the first line by 

n: 5

ok so where do you input the code(script)?

omg i am so wrthless

or you can make a function out of it.... right in the console.

ok so i am not doing this right

i am wrong at the verry beginning

so first things first

the console is for one-line inputs, if you want to type in your code 
directly. that interactive use of REBOL.


the way you want to do this, is create a script in notepad, and run 
the script from the REBOL console

how do i input the code as a whole in the interpreter

ahaa

try this:

does the script have any particular extension?

my-func: func [] [
	n: to-integer ask "enter a number"
	if  n < 0  [quit/return 1]
	sum: 0
	i: 0
	while [ i <= n ] [ sum: sum + probe (i * i)  i: i + 1]
	print sum
]

REBOL []

; right click this text area to copy the text

print "hello!"

then just:

my-func