От источников звуковой информации человек воспринимает которые обрабатывает его мозг.

Несовершеннолетним категорически запрещается:

Курить;

Приобретать и употреблять пиво и напитки, изготовляемые на его основе, алкогольную и спиртосодержащую продукцию, принимать без назначения врачей психотропные вещества, наркотики и другие токсические вещества;
Несовершеннолетние должны уважать труд работников и граждан по обеспечению чистоты, света и уюта в помещениях, подъездах.
Несовершеннолетние обязаны:

бережно и аккуратно относиться к имуществу, находящемуся в общественных местах;

в случае нанесения вреда имуществу, возместить, восстановить с родителями или лицами, их заменяющими, согласно действующему законодательству;

выполнить требования и Правила учреждения, общественного места в котором находятся;

соблюдать правила этикета общения и обращения с людьми.

1)

var

  s : real;

  i, n : integer;

begin

  s := 0;

  read (n);

  for i := 1 to n do s := s + 1 / i;

  writeln (s);

end.

 

2)

var

  a, i : integer;

begin

  a := 1;

  for i := 1 to 8 do

  begin

    a := a * 2;

    writeln ('Через ', i * 3, 'часов будет ', a, ' амеб');

  end;

end.

 

3)

var

  n, i : integer;

  x, s : real;

begin

  s := 0;

  read (n, x);

  for i := 1 to n do

    s := s + sin (i * x);

  writeln (s);

end.

 

4)

var

  n, a, r, i : integer;

begin

  r := 1;

  read (a, n);

  for i := 1 to n do r := r * a;

  writeln (r);

end.