Program gt; var p:real; a,b,w:integer; begin a:=-1; b:=1; w:=-1; while a<=103 do begin a:=a 2; b:=b 2; w:=w*-1; p:=p 1/a*b*w; end; writeln(p); end. 2) program gt; var p:real;a,b,w:integer; begin a:=-1;b:=1;w:=-1;p:=0; while a<=103 do begin a:=a 2; b:=b 2; w:=w*-1; p:=p (1/(a*b))*w; end; writeln(p); end. 1-первый случай 2-второй случай
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.
