tasks a-s
This commit is contained in:
parent
47bf37c096
commit
b83f433714
12433 changed files with 156208 additions and 123 deletions
1
Task/Reverse-a-string/Oz/reverse-a-string-1.oz
Normal file
1
Task/Reverse-a-string/Oz/reverse-a-string-1.oz
Normal file
|
|
@ -0,0 +1 @@
|
|||
{System.showInfo {Reverse "!dlroW olleH"}}
|
||||
9
Task/Reverse-a-string/Oz/reverse-a-string-2.oz
Normal file
9
Task/Reverse-a-string/Oz/reverse-a-string-2.oz
Normal file
|
|
@ -0,0 +1,9 @@
|
|||
local
|
||||
fun {DoReverse Xs Ys}
|
||||
case Xs of nil then Ys
|
||||
[] X|Xr then {DoReverse Xr X|Ys}
|
||||
end
|
||||
end
|
||||
in
|
||||
fun {Reverse Xs} {DoReverse Xs nil} end
|
||||
end
|
||||
Loading…
Add table
Add a link
Reference in a new issue