shintakezou

use v6.c;

# based on my original attempt, enhanced with protos
# and ideas from https://github.com/moritz/json

grammar JSON-Grammar
{
    token TOP { \s* <json-value> \s* }

    proto token json-value       { * }

shintakezou

! Find the solution for the problem
!    "Quesito con la Susi n. 948"
! from Italian magazine "La Settimana Enigmistica".
! Brute force, as usual.
!
! Find
!    n = 3*y0 + y1 + y2 + y3 + y4 + y5 + y6
! so that
!    y(i) is between 4 and 10 included
!    (hence n is between 36 and 90 included)

shintakezou

/* This trivially solves a quiz on the Italian magazine
   "La Settimana Enigmistica", namely
   "Quesito con la Susi n. 946".

   It uses, without any special reason, >C++11
   features.

   Problem: 
     There are four friends (Giovanni, Marco, Simone, Elisa)
     sat down behind a desk; Susi must say who's the shortest

shintakezou

/* This trivially solves a quiz on the Italian magazine
   "La Settimana Enigmistica", namely
   "Quesito con la Susi n. 946".

   It uses, without any special reason, >C++11
   features.

   Problem: 
     There are four friends (Giovanni, Marco, Simone, Elisa)
     sat down behind a desk; Susi must say who's the shortest

shintakezou

#include <iostream>
#include <iomanip>

std::string gimme_a_str(const std::string& s)
{
    return "string(\"" + s + "\")";
}

template<typename T>
void action_a(T& a)

shintakezou

Keybase proof

I hereby claim:

• I am shintakezou on github.
• I am shintakezou (https://keybase.io/shintakezou) on keybase.
• I have a public key whose fingerprint is 33C0 6022 DBE2 3B53 1815 AA92 A3D2 1F30 08B6 929F

To claim this, I am signing this object:

shintakezou

"This solves an Italian magazine's quiz, n. 939;
 you need an implementation for permutationsDo, 
 see miscellanea/gnusmalltalk/permutationsDo.st."

|p1 p2 p3 names perm0 bl1 bl2 bl3|

p1 := #(2 1 4 3 5).
p2 := #(3 4 5 1 2).
p3 := #(1 5 3 2 4).

shintakezou

-module(solve937).
-export([solve/0]).

% This solve the following problem:
%   find that number X < 54, so X^2 = A + B,
%   where A is the number made of the first
%   2 digits of X^2 and B is the number made
%   of the last 2 digits of X^2.

check(X) ->

shintakezou

/*
    A quiz with Susi 934 (in the Italian magazine
                          La settimana enigmistica)

    Alfio, Biagio, Carlo and Dino are four children,
    one of them broke the window of a building while
    all four were playing with slingshots.

    Questioned to know who did it,

shintakezou

%
% Problem from the Italian weekly magazine "La Settimana Enigmistica"
% 
%
% Three couples divided their earnings (1000euro) from their
%    second-hand clothes shop.
%
% The sum of the shares of the wives is 396.
%
% Giovanna (g) had 10e more than Carla (c);