aparler/RosettaCodeData
1
0
Fork 0
Code Issues 12 Pull requests 3 Projects Releases Packages Wiki Activity Actions

Data update

Browse source
This commit is contained in:
Ingy döt Net 2024-07-13 15:19:22 -07:00
parent 29a5eea0d4
commit 5c1bb7bfa9
2011 changed files with 35081 additions and 3229 deletions
Download patch file Download diff file Expand all files Collapse all files

20
Task/Character-codes/Langur/character-codes.langur
View file

@ -1,11 +1,11 @@
val .a1 = 'a'
val .a2 = 97
val .a3 = "a"[1]
val .a4 = s2cp "a", 1
val .a5 = [.a1, .a2, .a3, .a4]
val a1 = 'a'
val a2 = 97
val a3 = "a"[1]
val a4 = s2cp("a", 1)
val a5 = [a1, a2, a3, a4]
writeln .a1 == .a2
writeln .a2 == .a3
writeln .a3 == .a4
writeln "numbers: ", join ", ", [.a1, .a2, .a3, .a4, .a5]
writeln "letters: ", join ", ", map cp2s, [.a1, .a2, .a3, .a4, .a5]
writeln a1 == a2
writeln a2 == a3
writeln a3 == a4
writeln "numbers: ", join(", ", map(string, [a1, a2, a3, a4, a5]))
writeln "letters: ", join(", ", map(cp2s, [a1, a2, a3, a4, a5]))

6
Task/Character-codes/PascalABC.NET/character-codes.pas Normal file
View file

@ -0,0 +1,6 @@
begin
var c := 'a';
var i := c.Code;
Println(i);
Println(Chr(i))
end.