1)одна амёба делится в минуту на две. сколько амёб будет через 15 минут? 2)s=cos0.1+cos0.3++cos5 3)p=0.2*0.4*0.6**2.8 решить на языке паскаль !

Первая.
program one;
  var i:byte; a:integer;    begin    a:=1;      for i:=1 to 15 do begin        a:=a+a;      end;      write(a);      end.
Третья.
program three; var p:real; i:real; a:real;  begin  p:=1;  i:=1/5;    while i<=2+4/5 do begin    p:=p*i;    i:=i+1/5;    write(p, ' ');    end;    write(p);    end.
Во второй промежуточное не понял, напишите без многоточия.