YoukaiCat

-- Найти все натуральные числа a,b,c из интервала от 1 до 20,
-- для которых выполняется равенство c2 = b*a2

numbers :: [(Int, Int, Int)]
numbers = [ (a,b,c) | a <- [1..20], b <- [1..20], c <- [1..20], c * 2 == b  * a * 2 ]

main :: IO ()
main = mapM_ printParams numbers
  where
    printParams (a,b,c) = putStrLn $ "a = " ++ show a ++ ", b = " ++ show b ++ ", c = " ++ show c

YoukaiCat

// Returns a full path to the current dir
function currentDirPath():String;
begin
  result:=extractFileDir(expandFileName('anything'));
end;

// Makes connection string at runtime.
// it's necessary because delphi don't understand relative paths.
procedure TDataModule.ADOConnectionBeforeConnect(Sender: TObject);
begin

YoukaiCat

program zadacha1;

uses Math;

var
  x : integer;

function z(x : integer) : real;
var y : real;
begin

YoukaiCat

#include <stdlib.h>
#include <stdio.h>
#include <string.h>

#define BUFF_SIZE 6 /* 5 chars and \0 */

int main()
{
    int count = 0;
    char temp[BUFF_SIZE];

YoukaiCat

#!/usr/bin/env ruby
# coding: utf-8

module LCG
  def self.generate prev, a, c, m
    (a * prev + c) % m
  end
end

class LCGBruteForce

YoukaiCat

#!/usr/bin/env ruby
# coding: utf-8

# gem install gnuplot
# Jmeter config: ${__P(threads,1)} and ${__P(rampup,0)}

module OS
  require 'rbconfig'

  def self.os

YoukaiCat

FROM debian:latest

MAINTAINER Vladislav Mileshkin "noein93@gmail.com"

RUN apt-get update
RUN apt-get install -y \
  libncurses5-dev \
  libreadline-dev \
  nettle-dev \
  libgnutls28-dev \

YoukaiCat

object MonadInterface {
  import scala.language.higherKinds

  trait Functor[T[_]] {
    def map[A, B](f: A => B)(x: T[A]): T[B]
  }

  trait Applicative[T[_]] extends Functor[T] {
    def pure[A](v: A): T[A]
    def apply[A, B](f: T[A => B])(a: T[A]): T[B]

YoukaiCat

class Analyzer
  attr_reader :name

  def initialize name, numbers, bits_count = 16
    @name = name
    @numbers = numbers
    @bits_count = bits_count
  end

  # Случайность распределения

YoukaiCat

#include "MoveSemanticsBench.h"

#include <vector>
#include <algorithm>
#include <memory>
#include <iostream>

#include "Utils.h"

//~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~