Add tasks for all the new languages

Task/Pangram-checker/Ceylon/pangram-checker.ceylon

@@ -0,0 +1,17 @@
+shared void run() {
+
+	function pangram(String sentence) =>
+ 		let(alphabet = set('a'..'z'),
+			letters = set(sentence.lowercased.filter(alphabet.contains)))
+ 		letters == alphabet;
+
+ 	value sentences = [
+ 		"The quick brown fox jumps over the lazy dog",
+ 		"""Watch "Jeopardy!", Alex Trebek's fun TV quiz game.""",
+ 		"Pack my box with five dozen liquor jugs.",
+ 		"blah blah blah"
+ 	];
+ 	for(sentence in sentences) {
+ 		print("\"``sentence``\" is a pangram? ``pangram(sentence)``");
+ 	}
+}

Task/Pangram-checker/FreeBASIC/pangram-checker.freebasic

@@ -0,0 +1,27 @@
+' FB 1.05.0 Win64
+
+Function isPangram(s As Const String) As Boolean
+  Dim As Integer length = Len(s)
+  If length < 26 Then Return False
+  Dim p As String = LCase(s)
+  For i As Integer = 97 To 122
+    If Instr(p, Chr(i)) = 0 Then Return False
+  Next
+  Return True
+End Function
+
+Dim s(1 To 3) As String = _
+{ _
+ "The quick brown fox jumps over the lazy dog", _
+ "abbdefghijklmnopqrstuVwxYz", _ '' no c!
+ "How vexingly quick daft zebras jump!" _
+}
+
+For i As Integer = 1 To 3:
+  Print "'"; s(i); "' is "; IIf(isPangram(s(i)), "a", "not a"); " pangram"
+  Print
+Next
+
+Print
+Print "Press nay key to quit"
+Sleep

Task/Pangram-checker/Nim/pangram-checker.nim

@@ -0,0 +1,8 @@
+import rdstdin
+
+proc isPangram(sentence; alphabet = {'a'..'z'}): bool =
+  var sentset: set[char] = {}
+  for c in sentence: sentset.incl c
+  alphabet <= sentset
+
+echo isPangram(readLineFromStdin "Sentence: ")

Task/Pangram-checker/Ring/pangram-checker.ring

@@ -0,0 +1,15 @@
+pangram = 0
+s = "The quick brown fox jumps over the lazy dog."
+see "" + pangram(s) + " " + s + nl
+
+s = "My dog has fleas."
+see "" + pangram(s) + " " + s + nl
+
+func pangram str
+     str  = lower(str)
+     for i = ascii("a") to ascii("z")
+             bool = substr(str, char(i)) > 0
+             pangram = pangram + bool
+     next
+     pan = (pangram = 26)
+     return pan

Task/Pangram-checker/Sidef/pangram-checker.sidef

@@ -0,0 +1,14 @@
+define Eng = 'a'..'z';
+define Hex = 'a'..'f';
+define Cyr = %w(а б в г д е ж з и й к л м н о п р с т у ф х ц ч ш щ ъ ы ь э ю я ё);
+
+func pangram(str, alpha=Eng) {
+    var lstr = str.lc;
+    alpha.all {|c| lstr.contains(c) };
+}
+
+say pangram("The quick brown fox jumps over the lazy dog.");
+say pangram("My dog has fleas.");
+say pangram("My dog has fleas.", Hex);
+say pangram("My dog backs fleas.", Hex);
+say pangram("Съешь же ещё этих мягких французских булок, да выпей чаю", Cyr);

Task/Pangram-checker/Swift/pangram-checker-1.swift

@@ -0,0 +1,16 @@
+import Foundation
+
+let str = "the quick brown fox jumps over the lazy dog"
+
+func isPangram(str:String) -> Bool {
+    let stringArray = Array(str.lowercaseString)
+    for char in "abcdefghijklmnopqrstuvwxyz" {
+        if (find(stringArray, char) == nil) {
+            return false
+        }
+    }
+    return true
+}
+
+isPangram(str) // True
+isPangram("Test string") // False

Task/Pangram-checker/Swift/pangram-checker-2.swift

@@ -0,0 +1,4 @@
+func isPangram(str: String) -> Bool {
+  let (char, alph) = (Set(str.characters), "abcdefghijklmnopqrstuvwxyz".characters)
+  return !alph.contains {!char.contains($0)}
+}

Task/Pangram-checker/jq/pangram-checker.jq

@@ -0,0 +1,11 @@
+def is_pangram:
+  explode
+  | map( if 65 <= . and . <= 90 then . + 32 # uppercase
+         elif 97 <= . and . <= 122 then .   # lowercase
+         else empty
+         end )
+  | unique
+  | length == 26;
+
+# Example:
+"The quick brown fox jumps over the lazy dog" | is_pangram