Пожалу та не как в комп а в тетради написать надо пж очеееееенььььь

Question

Пожалу та не как в комп а в тетради написать надо пж очеееееенььььь

---

Comments

Блин ну кто же помоги е

Answer 1

Program z1;  Var i:integer; s:real;Begin  s:=1;  i:=2;  While i<=10 do  begin    s:=s+1/i;    i:=i+1;  end;  write(s);End. 

Comments

Program z1;
Var i,j:integer; s:real;
Begin
s:=0;
i:=2;
j:=3;
While i<=10 do<br> begin
s:=s+i/j;
i:=i+1;
j:=j+1;
end;
write(s);
End.

---

вторая задача