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 2026-02-01 16:33:20 -08:00
parent 5150844a7d
commit 4bb20c9b71
7735 changed files with 38060 additions and 199180 deletions
Download patch file Download diff file Expand all files Collapse all files

6
Task/Character-codes/Ada/character-codes.ada
View file

@ -1,6 +0,0 @@
with Ada.Text_IO; use Ada.Text_IO;
procedure Char_Code is
begin
Put_Line (Character'Val (97) & " =" & Integer'Image (Character'Pos ('a')));
end Char_Code;

2
Task/Character-codes/Arturo/character-codes.arturo
View file

@ -1,3 +1,3 @@
print to :integer first "a"
print to :integer `a`
print to :integer 'a'
print to :char 97

9
Task/Character-codes/COBOL/character-codes.cobol
View file

@ -1,9 +0,0 @@
identification division.
program-id. character-codes.
remarks. COBOL is an ordinal language, first is 1.
remarks. 42nd ASCII code is ")" not, "*".
procedure division.
display function char(42)
display function ord('*')
goback.
end program character-codes.

2
Task/Character-codes/Elena/character-codes.elena
View file

@ -1,6 +1,6 @@
import extensions;
public program()
public Program()
{
var ch := $97;

2
Task/Character-codes/Emacs-Lisp/character-codes.l
View file

@ -1,2 +0,0 @@
(string-to-char "a") ;=> 97
(format "%c" 97) ;=> "a"

2
Task/Character-codes/Euphoria/character-codes.ex
View file

@ -1,2 +0,0 @@
printf(1,"%d\n", 'a') -- prints "97"
printf(1,"%s\n", 97) -- prints "a"

7
Task/Character-codes/Haxe/character-codes.haxe
View file

@ -1,7 +0,0 @@
class Main {
static public function main():Void {
trace("a".code);
trace("∅".code);
trace("🍆".code);
}
}

4
Task/Character-codes/K/character-codes.k
View file

@ -1,5 +1,5 @@
_ic "abcABC"
`i$ "abcABC"
97 98 99 65 66 67
_ci 97 98 99 65 66 67
`c$ 97 98 99 65 66 67
"abcABC"

1
Task/Character-codes/PowerShell/character-codes-1.psh
View file

@ -1 +0,0 @@
$char = [convert]::toChar(0x2f) #=> /

1
Task/Character-codes/PowerShell/character-codes-2.psh
View file

@ -1 +0,0 @@
$char = [char] 'a'

1
Task/Character-codes/PowerShell/character-codes-3.psh
View file

@ -1 +0,0 @@
$charcode = [int] $char # => 97

1
Task/Character-codes/PowerShell/character-codes-4.psh
View file

@ -1 +0,0 @@
[int] [char] '☺' # => 9786

2
Task/Character-codes/PowerShell/character-codes-5.psh
View file

@ -1,2 +0,0 @@
[char] 97 # a
[char] 9786 # ☺

3
Task/Character-codes/Retro/character-codes.retro
View file

@ -1 +1,2 @@
'c putc
$a n:put nl
#97 c:put nl

5
Task/Character-codes/VBScript/character-codes.vb
View file

@ -1,5 +0,0 @@
'prints a
WScript.StdOut.WriteLine Chr(97)
'prints 97
WScript.StdOut.WriteLine Asc("a")