10 lines
180 B
Text
10 lines
180 B
Text
|
(while (read)
|
||
|
|
(when (num? @)
|
||
|
|
(println (* @ @)) ) )
|
||
|
|
abc # Not a number
|
||
|
|
7 # Number
|
||
|
|
49 # -> print square
|
||
|
|
xyz # Not a number
|
||
|
|
3 # Number
|
||
|
|
9 # -> print square
|