Дано целое число n. вычеслить s=1/4+1/8+1/12++1/4n надо

Var   s: double;   i, n: integer;     begin   readln(n);   for i : = 4 to 4 * n do     s += 1 / i;   writeln(s); end.

1.  кладем на каждую чашу по 3 монеты. весы будут либо в равновесии, либо одна чаша перевесит другую. 1а.  если весы будут уравновешены, то в каждой группе из 3 монет имеется фальшивая.  2а. проверяем первую группу из 3 монет. кладем  на каждую чашу весов по одной монете. если весы будут в равновесии, то фальшивая монета - та, которая осталась; если фальшивая монета находится на весах, то взвешивание это покажет (чаша с фальшивой монетой будет выше). 3а. такие же действия выполняем со второй группой из 3 монет.  1б. если при первоначальном взвешивании одна чаша перевесит другую, то обе фальшивые монеты находятся в одной группе монет (в той, которая легче). 2б. кладем на каждую чашу весов по одной монете из выбранной (более легкой) группы монет. если весы в равновесии, то обе монеты на весах фальшивые. если одна чаша перевешивает другую, то фальшивые монеты - одна из тех, что находятся на весах (более легкая) и оставшаяся монета. таким образом, две фальшивые монеты можно определить максимум на три взвешивания, минимум - за два.

1)  биологическая  информация -  кодирование генетической информации, сложными психологическими процессами у высших животных на основе передачи энергии.  2) социальная информация -  это способ (форма) передачи знаний, эмоций и волевых воздействий в обществе.  3) кибернетическая информация -  это характеристики сигнала, передаваемого по линии связи.4) философская информация -  это взаимодействие, отражение, познание.5) информация -  это сведения об объектах и явлениях окружающей среды, их параметрах, свойствах и состоянии, которые уменьшают имеющуюся о них степень неопределённости и неполноты знаний.