Class Program
{
static void Main(string[] args)
{
int res = 1;
Console.Write("Введите n: ");
int n = Convert.ToInt32(Console.ReadLine());
for(;n > 0; n--)
res *= n;
Console.Write("Результат: {0}",res);
Console.ReadLine();
}
}
1. архивирование данных 2. отправка данных по электронной почте, так быстрее прикрепятся к письму, потому что меньше объём 3. многие программы читают данные только из архивов, а не из первоначальных папок
1шаг алгоритма.
а) <span>записывается исходная цепочка символов, после нее записывается исходная цепочка символов в обратном порядке
КОМ+МОК = КОММОК
б) </span><span>затем записывается буква, следующая в русском алфавите за той буквой, которая в исходной цепочке стояла на последнем месте
(за буквой М в русском алфавите следует буква Н)
КОММОК+Н = </span>КОММОКН<span>
2 шаг алгоритма.
</span>а) записывается исходная цепочка символов, после нее записывается исходная цепочка символов в обратном порядке
КОММОКН+НКОММОК = КОММОКННКОММОК
б) затем записывается буква, следующая в русском алфавите за той буквой, которая в исходной цепочке стояла на последнем месте
(за буквой Н в русском алфавите следует буква О)
КОММОКННКОММОК+О = КОММОКННКОММОКО
Ответ: количество букв О в полученной последовательности = 5
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>
<span>var a,b,h,x,s:real; n:integer;
begin
a:=pi/3; b:=pi/2; n:=60;
h:=(b-a)/n;
s:=0;
x:=a+h/2;
repeat
s:=s+(sin(x)+cos(2*x))/(2+cos(x));
x:=x+h;
until x>b-h/4;
s:=s*h;
writeln(x);
end<span>.
Результат:
</span><span> 1.575159649924877e+00</span></span>