bruno-cadorette

#include "Windows.h"
#include <iostream>
#include <thread>

using namespace std;

void WaitForKey(int vKey)
{
	while (!GetAsyncKeyState(vKey));
}

bruno-cadorette

import Control.Monad
import Data.Bits
import Data.List
import Data.List.Split
import Data.Word

createMask::Int -> [Word8]
createMask mask = take 4 $ gen mask ++ repeat 0
	where
		gen mask

bruno-cadorette

fizzbuzz xs =
    let
        fizz = cycle ["","","fizz"]
        buzz = cycle  ["","","","","buzz"]
        f x i = if null x then show i else x
    in
        zipWith3 (\fz bz i-> f (fz++bz) i) fizz buzz xs 

main = do
    putStr $ unlines $ fizzbuzz [1..100] 

bruno-cadorette

let rec reverse str =
    let a = Console.ReadLine()
    if a <> "0" then
        reverse a
    printfn "%s" str

[<EntryPoint>]
let main argv = 
    reverse ""

bruno-cadorette

open System.Speech.Synthesis
open System

type language = {
    presents: string array
    line: string
    lastPrefix: string
    suffix: int->string
}
 

bruno-cadorette

using System;
using System.Collections.Generic;
using System.Linq;
using System.Web;
using System.Web.Mvc;
using System.Linq.Expressions;

public static class CheckBoxListForExtensions
{
    public static MvcHtmlString CheckBoxListFor<TModel, TValue>(this HtmlHelper<TModel> html, Expression<Func<TModel, TValue>> expression, SelectList selectList)