1*1+2-(3+4)+5=1*1+2+3-4+5-6=1*1*2*3*4-5*6+7=(1+1-2+3)-(4+5-6+7-8)=1
{Я не до конца понимаю роль переменной n в данной задаче. Если задать большое значение данной переменной, программа вернёт NaN}
//Pascal ABC.NET v3.1 сборка 1172
Var
x,r:real;
n,i,k:integer;
function fact(n:integer):real;
Var
i,k:integer;
begin
k:=1;
for i:=1 to n do
k:=k*i;
fact:=k;
end;
begin
readln(x);
readln(n);
k:=1;
r:=0;
for i:=1 to n do
begin;
if odd(i) then
r:=r+power(x,k)/fact(k)
else
r:=r-power(x,k)/fact(k);
k:=k+2;
end;
writeln(r);
end.
<span>Пример ввода:
</span>
1
10
<span>Пример вывода:
0.841470972080175</span>
// PascalABC.NET 3.1, сборка 1204 от 24.03.2016
begin
var x:=0.5;
while x<=2.1 do begin
Writeln('x=',x:3:1,' y=',tan(sin(x))+2);
x+=0.2
end
end.
<u><em>Результат выполнения программы</em></u>
x=0.5 y=2.5198809015013
x=0.7 y=2.75112025607465
x=0.9 y=2.99586604900996
x=1.1 y=3.23765167169871
x=1.3 y=3.43923041043966
x=1.5 y=3.5488600833871
x=1.7 y=3.52922062804747
x=1.9 y=3.38750383103094
x=2.1 y=3.16912357769899
Перевод из бит в мегабайт в с :
80*10^20 бит в секунду = 0.00001 мегабайт в секунду
перевод 1 м 20с в секунды : 80с
находим файл : 80с * 0.00001 мегабайт в секунду = 0,0008 мегабайт
Дневник ру - это сайт. Он написан на Php с разметной HTML. Также, применяются стили CSS