б) Спросить одного из них- "Что бы ответил твой, если бы его спросили, какая дорога идет к озеру ?"
Ответ по любому будет лживым и значит надо выбрать не ту дорогу которую указали
function Max(a, b, c: integer): integer;
var
m: integer;
begin
if a > b then
m := a
else
m := b;
if c > m then
m := c;
Max := m;
end;
function Min(a, b, c: integer): integer;
var
m: integer;
begin
if a < b then
m := a
else
m := b;
if c < m then
m := c;
Min := m;
end;
procedure Swap(var a, b: integer);
var
t: integer;
begin
t := a;
a := b;
b := t;
end;
var
a, b, c, t: integer;
begin
Write('Введи через пробел три числа: ');
Read(a, b, c);
Writeln('Max = ', Max(a, b, c), ', min = ', Min(a, b, c));
if b > a then
Swap(a, b);
if c > b then
begin
Swap(b, c);
if b > a then
Swap(a, b);
end;
Writeln(a, ' ', b, ' ', c);
end.
1) Пятеричная система счисления - 5 пальцев на руке
2) Десятичная система счисления - 10 пальцев на двух руках
3) Двенадцатеричная система счисления:
- на каждом пальце у человека три части - фаланги. Для счета использовали только четыре пальца, значит 12 частей. Исключение составляет только большой палец - у него одна косточка, две части и его использовали для фиксирования пальцев при расчетах
- время, которое влияет на жизнь человека ( количество часов в сутках, количество месяцев было определено еще в древнем мире)
4) Двадцатеричная система счисления:
- количество пальцев у человека на руках и ногах
или
- количество косточек на двух руках пальцев - на каждом пальце у человека 2 косточки для сгиба пальца, т.е. на одной руке 10 косточек - большой палец сгиб у основания + 1 косточка фаланг
Mas:array[1..31] of integer;
mas[i] будет хранить вес в день i
А1 - 1 (радиотелефон)
А2 - 2 (некуда вставлять)
А3 - 4
А4 - 2 (30 - 1 = 29; 2014 - 29 = 1985)
А5 - 1
А6 - 3 (первый и четвёртый)
А7 - 4
А8 - 1 (доска -> ска, нерв -> нер, сканер)
А9 - 1 (1 - 12:45; 2 - 12:15; 3 - 11:45)
А10 - 4 (у аватара рот закрыт, а у человека открыт)
А11 - 1 (камера)
А12 - 3 (сканер)