#include <iostream>
using namespace std;
int main()
{
<span> int a[15];
</span><span> int i = 0;
</span><span> int sum = 0;
</span><span> for (; i < 15; i++)
</span> cin >> a[i];
for (i = 14; (i != 0) && (a[i]>0); i--) <span>
sum += a[i];</span>
cout << "i = " << i+1 << endl;
<span> cout << "summa = " << sum << endl;
</span><span> return 0;
</span>}
Var a,b,i,z:integer;y,x,h,k:real;
begin
write('введите a,b,h');read(a,b,h); k:=(b - a)/h;z:= round(k);
for i:=0 to z do begin
x:=a + h*i;
y:= x*x *sin(x*Pi/180);
write(x:6);writeln(y:21:6);<span>end;</span>
Const eps=0.001;
var x,xi,an,s:real; i,f:integer;
begin
readln(x);
xi:=1; f:=1; i:=0;
an:=xi/f; s:=an;
while abs(an)>eps do
begin
i:=i+1;
f:=f*i;
xi:=xi*x;
an:=xi/f;
s:=s+an;
end;
writeln('s = ',s:6:4,' e^',x:0:1,' = ',exp(x):6:4);
end.
Пример:
0.9
<span>s = 2.4595 e^0.9 = 2.4596</span>