Дана зашифрованная пословица.чтобы рубить дрова, нужен 14, 2, 3, 2, 7, а чтобы полить огород – 10, 4, 5, 1, 6. рыбаки сделали во льду 3, 7, 2, 7, 8, 9, 11 и стали ловить рыбу. самый колючий зверь в лесу – это 12, 13. а теперь расшифруйте пословицу: 1, 2, 3, 4, 5, 1, 67, 8, 9, 10, 119, 4, 7, 4, 13, 12, 14

Чтобы рубить дрова, нужен  топор, а чтобы полить огород –   (лейка) рыбаки сделали во льду прорубь и стали ловить рыбу. самый колючий зверь в лесу – это ёж копейка рубль бережет

program jopascal;

var

  i, a: longint;

  x,

  u, j,  

  n, m : longint;

function fdiv (a, left : longint) : longint;

var

d,  

i : longint;

begin

d : = 1;  

for i : = left to trunc (sqrt (a)) do

if (a mod i = 0)

then

begin

d : = i;  

break;  

end;

if (d < > 1)

then

fdiv : = d

else  

fdiv : = a;

end;

function g (n, u : longint) : longint;

var

i : longint;  

begin

i : = 0;  

while (n mod u = 0)

do

begin

inc (i);

n : = n div u;

end;

g : = i;

end;

begin

assign (input, 'input.txt');

assign (output, 'output.txt');

reset (input);

read (a);

close (input);

m : = 0;

n : = 1;  

i : = fdiv (a, 2);

u : = 2;  

while (a > 1)

do

begin

n : = n * i;  

j : = 0;  

  while (a mod i = 0)

  do

begin

inc (j);

a : = a div i;

end;

if (j > m)

then

begin

m : = j;  

u : = i;  

end;

i : = fdiv (a, i + 2);

end;

x : = 1;

while (g (n * x, u) * n * x < m)

do

inc (x);

n : = n * x;  

rewrite (output);

write (n);

close (output);

end.

== проверяет одинаково ли значение операндов, если одинаковы – то условие является истинной (true);

! = проверяет одинаково ли значение операндов, если не одинаковы – то условие является истинной (true);

< > проверяет одинаково ли значение операндов, если не одинаковы – то условие является истинной (true);

> проверяет значение левого оператора, если он больше, чем правый – то условие является истинной;

< проверяет значение левого оператора, если он меньше, чем правый – то условие является истинной;

> = проверяет значение левого оператора, если он больше или равен правому – то условие является истинной;

< = проверяет значение левого оператора, если он меньше или равен правому – то условие является истинной;