fork download
copy 
  1. |n fact|
  2. [
  3.    n:=5.
  4.    fact:=0.
  5.  
  6.    if [n == 5].
  7.     fact := n*(n-1)*(n-2)*(n-3)*(n-4).
  8.     printf " El Factorial de 5 es: ",fact;
  9. ]
Success #stdin #stdout 0.02s 74112KB
comments (?)
stdin
copy 
1
2
10
42
11
5
stdout
copy 
Standard output is empty
https://ideone.com/saXyv
language:
Smalltalk (gst 3.2.5)
created:
13 years ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!