Блок-схема 1
Здраствуйте, посогите нарисовать блок-схему
uses crt; var n:integer; * * e,s,t:real; begin clrscr; e:=0.0001; n:=0; t:=1; s:=t; while abs(t)>e do *begin * n:=n+1; * t:=-t/n; * s:=s+t; *end; writeln('S *=',s:0:5); write('1/e=',1/exp(1):0:5); readln end. |
помогите плиз очень надо
|
Цитата:
|
Часовой пояс GMT +4, время: 22:24. |
Powered by vBulletin® Version 4.5.3
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.