Помогите паже // информатика

Question

Помогите паже // информатика

---

Comments

язык паскаль

Answer 1

Program Jum_Ihisel;

Var s: real; n:integer;

Begin

s:=0;

n:=8;

while s<21 do</p>

 begin

 s:=s+5/n;

 n:=n*2;

 end;

writeln("Сумма= ", s);

End.

Comments

неа, не правильно