2 задача
program qq;
<span>var b, c, z, d: integer;</span><span>
S, a: real;
</span>
begin
<span>
S := 0; z := 1;</span>
<span><span> b := </span>2; c
:= 3; d:= 3; a := 1;</span><span>
while abs(a) > 0.001 do begin</span><span>
S := S + a;
</span><span> a := z * b / (c*d);</span><span>
z := - z;</span><span>
b := b + 2;</span><span>
c := c + 2; d:=d*3;</span><span>
end;</span>
<span> writeln('S =', S:10:3);
</span> <span>end.
</span>КАК то так
Чтобы не испортить и себя и компьютер
Выпей парацетамол или фейрвекс, ну что то в этом роде.
Gorilla ist sehr groß und sehr groß strashnaya.U ihr Haar. Es ist sehr groß. Oft sind sie sehr schwarz garilly strashnye.Harakter haben sehr wild, wie sie denken ya.A Ich möchte auch sie auf nastoyashimu <span>sehen.</span>