1
2
3
4
5
6
7
8
ShilpaShree HR 5:14 PM
| aString aChar i count aLength aSet aCount |
 
aString:= 'aabababba'.
 
aLength:= aString size.
 
aSet := Set new.
 ...

1
2
3
4
5
6
7
8
ShilpaShree HR 5:14 PM
| aString aChar i count aLength aSet aCount |
 
aString:= 'aabababba'.
 
aLength:= aString size.
 
aSet := Set new.
 ...

1
2
3
4
5
6
7
8
9
 
| aString aChar i c j count aLength |
aString:= 'aabgtrrd'.
aLength:= aString size.
i:= 1.
j:= 1.
[i<=aLength] whileTrue:[
aChar:= aString at: i.
[j<i] whileTrue:[
 ...

1
2
3
4
| a |
a := #(1 2 3 4 5) asBag.
a do: [ :elem | a add: elem ].
^ a

1
2
3
4
5
6
| x y |
      x := 5.
      y := 0.
      [x < y] whileFalse: [y := y + 1].
      ^y
 

1
2
3
4
5
6
7
8
(define (margreteborg row col)
(cond ((< row col) #f)
((or (= 0 col) (= row col)) 1)
(else (+ (margreteborg (- row 1) col) (margreteborg (- row 1) (- col 1))))))
 
N (margreteborg 2 2)+(margreteborg 3 2)+(margreteborg 11 2)
(margreteborg 6 3)+(margreteborg 3 2)
.(margreteborg 12 5)- (margreteborg 5 3)
 ...

1
2
3
4
5
6
7
8
9
| n a b |
n:= 1.
a:= 3.
b:= 14.
[n<=(a*b)]whileTrue:[
( (n\\a==0) and: [n\\b==0] )
ifTrue:[^ Transcript show:n printString].
((n\\a==0) and: [n\\b==0])
ifFalse:[n:=n+1].]

1
2
3
4
5
6
7
8
9
xb1lIHRvIG5lYnlsbyB0xJvFvmvDqT8gSmVuIHBybyDDunBsbm9zdCBwcm8gbm9ybcOhbG7DrSAo
dGVkeSBuZXBvxI3DrXRhxI1vdsO9KSAgbGlkIC0gcHJvxI0gUG/FoXRvdm7DrT8gIEvDs2QgQmFz
ZTY0LCBrdGVyw71tIGplIHRlbmhsZSB0ZXh0IHpha8OzZG92w6FuLCBwb3XFvsOtdsOhdGUgbWou
ICAoYW5pxb4gdG8gdMWZZWJhIHbDrXRlKSB2ZSB2xaFlY2ggdmHFoWljaCBlbWFpbG92w71jaCB6
cHLDoXbDoWNoIGsgdG9tdSwgYWJ5IHNlIGsgdsOhbSBuZWJvIG9kIHbDoXMgZG9ixZllIHDFmWVu
ZXNseSB2xaFlY2hueSBWYcWhZSBmb3RreSwgdmlkZWEsIHRleHR5IHMgxI1lc2tvdSBkaWFrcml0
aWtvdSBhIGppbsOpIHZ5Y2h5dMOhdmt5IChvYmVjbsOhIGJpbsOhcm7DrSBkYXRhIHNlIGvDs2R1
asOtIHBvIDYgYml0ZWNoIGRvIHRpc2tudXRlbG7DvWNoIDY0IHpuYWvFrywga3RlcsOpIGpzb3Ug
cMWZZW5vc2l0ZWxuw6EgcG/FoXRvdm7DrW0gIE1JTUUgcHJvdG9rb2xlbSkuIFRha8W+ZSAgdGFr
 ...

1
gfd

1
2
3
4
5
6
7
8
9
| a |
a:= 1.
[a<5] whileTrue:[
(a = 3) ifTrue:[
self halt: 'h'.
Transcript tab; show: 'hai'
].
Transcript tab; show: a printString.
a:= a+1

1
2
3
4
5
6
7
8
9
| a |
a:= 1.
[a<5] whileTrue:[
(a = 3) ifTrue:[
self halt:
].
Transcript tab; show: a printString.
a:= a+1
]

1
2
3
4
5
6
7
8
9
| aBag sizeBag aCount |
 
aBag:= Bag new.
 
aBag := #( 1 2 3 3 3 3) asBag.
 
  sizeBag:= aBag size.
 
  aCount:= aBag occurrencesOf: 3.
 ...

1
2
3
4
5
6
7
8
9
| aSet sizeSet aCount |
 
aSet:= Set new.
 
aSet add: 1.              "It replaces"
 
aSet add: 1.
 
aSet add: 1.
 ...

1
2
3
4
5
6
7
8
9
| aBag sizeBag aCount |
 
aBag:= Bag new.
 
aBag := #( 1 2 3 3 3 3) asBag.
 
  sizeBag:= aBag size.
 
  aCount:= aBag occurrencesOf: 3.
 ...

1
2
3
4
5
6
7
8
9
| a |
a:= 1.
[a<5] whileTrue:[
(a = 3) ifTrue:[
self continue:
].
Transcript tab; show: a printString.
a:= a+1
]

1
2
3
4
5
6
7
8
9
| a |
a:= 1.
[a<5] whileTrue:[
(a = 3) ifTrue:[
self halt: 'k'
].
Transcript tab; show: a printString.
a:= a+1
]

1
2
3
4
5
6
7
| a |
a:= 1.
[a<5] whileTrue:[
self haltIf: [ a = 3 ].
Transcript tab; show: a printString.
a:= a+1
]

1
2
3
4
5
6
7
| a |
a:= 1.
[a<5] whileTrue:[
self haltIf [ a = 3 ].
Transcript tab; show: a printString.
a:= a+1
]

1
2
3
4
5
6
7
8
9
| a |
a:= 1.
[a<5] whileTrue:[
(a = 3) ifTrue:[
self halt.
].
Transcript tab; show: a printString.
a:= a+1
]

1
2
3
4
5
6
7
8
9
| a |
a:= 1.
[a<5] whileTrue:[
(a = 3) ifTrue:[
a halt
].
Transcript tab; show: a printString.
a:= a+1
]

1
2
3
4
5
6
7
8
9
| a |
a:= 1.
[a<5] whileTrue:[
(a = 3) ifTrue:[
self halt
].
Transcript tab; show: a printString.
a:= a+1
]

1
2
3
4
5
6
7
8
9
| a |
a:= 1.
[a<5] whileTrue:[
(a = 3) ifTrue:[
continue
].
Transcript tab; show: a printString.
a:= a+1
]

1
2
3
4
5
6
7
8
9
| a |
a:= 1.
[a<5] whileTrue:[
(a > 3) ifTrue:[
self halt: 'h'
].
Transcript tab; show: a printString.
a:= a+1
]

1
2
3
4
5
6
7
8
9
| a |
a:= 1.
[a<5] whileTrue:[
(a = 3) ifTrue:[
Transcript tab; show: 'hai'.
self halt:
].
Transcript tab; show: a printString.
a:= a+1

1
2
3
4
5
6
7
8
9
| a |
a:= 1.
[a<5] whileTrue:[
(a = 3) ifTrue:[
Transcript tab; show: 'hai'.
self halt: 'hai2'
].
Transcript tab; show: a printString.
a:= a+1

1
2
3
4
5
6
7
8
9
| a |
a:= 1.
[a<5] whileTrue:[
(a = 3) ifTrue:[
Transcript tab; show: 'hai'.
self halt
].
Transcript tab; show: a printString.
a:= a+1

1
2
3
4
5
6
7
8
9
| a |
a:= 1.
[a<5] whileTrue:[
(a = 3) ifTrue:[
Transcript tab; show: 'hai'.
halt
].
Transcript tab; show: a printString.
a:= a+1

1
2
3
4
5
6
7
8
9
| a |
a:= 1.
[a<5] whileTrue:[
(a = 3) ifTrue:[
halt
].
Transcript tab; show: a printString.
a:= a+1
]

1
2
3
4
5
6
7
8
9
| a |
a:= 1.
[a<5] whileTrue[
(a = 3) ifTrue[
halt
].
Transcript tab; show: a printString.
a:= a+1
]

1
2
3
4
5
6
7
8
| a |
a:= 1.
(a<5) ifTrue[
(a = 3) ifTrue[
halt
].
Transcript tab; show: a printString
]