Ответ:
Презентация о кактусе
Объяснение:
Кактусы – это многолетние растения, которые обладают сочными, утолщенными и мясистыми стеблями. Они покрыты колючками, щетинками или волосками. У большинства видов кактуса плоды ягодообразные, мясистые, у некоторых даже съедобные. Из-за того, что растения преимущественно произрастают в пустыне, они лишены листвы. Листья превратились в колючки, вода стала накапливаться в массивном толстом стебле. Кстати о колючках. Они имеют разную форму – плоскую, круглую, прямую или крючковидную, пушистую или гладкую. Хотя у некоторых видов семейства есть листья. Так, у перескии, произрастающей в Южной Америке, Мексике, Индии имеется древесный стебель, листья и… колючки. У других растений, опунций, есть маленькие листья длиной 2-5 мм. Внешне они напоминают шило и очень сочные. Листья прорастают весной и через короткое время высыхают и опадают. Кактусы накапливают даже малую часть воды, которая попала в почву. Молодые побеги могут уловить влагу даже с воздуха. Потом они опадают и укореняются. Самые большие кактусы могут накопить до 2000 литров воды. А чтобы меньше испарялось влаги, растения покрылись толстой зеленой кожицей, а поверх нее — волосяной покров или слой воска.
#include <iostream>
#include <cmath>
using namespace std;
//Функция вычисления факториала
long double fact(int N) {
if(N < 0)
return 0;
if (N == 0)
return 1;
else
return N * fact(N - 1);
}
int main() {
int k;
double x, S;
cout << "k = "; cin >> k;
cout << "x = "; cin >> x;
for (int n = 1; n <= k; n++)
S += (pow(-1,(n+1)) * pow(x,(2*n-1)))/fact(2*n-1);
cout << "S = " << S << endl;
system("pause");
return 0;
}
// PascalABC.NET 3.1, сборка 1192 от 07.03.2016
begin
var a:=ArrRandom(ReadInteger('n='),10,50);
a.Println;
var imax:=a.IndexMax; a[imax]:=a[imax] div 2;
a[a.IndexMin]*=2;
a.Println
end.
<u><em>Тестовое решение:</em></u>
n= 10
39 23 22 15 37 41 16 44 41 31
39 23 22 30 37 41 16 22 41 31
12212
_____________________
Program chik;
var i,a,b,c:integer;
begin
for i:=100 to 999 do
begin
a:=i div 100;
b:=(i div 10)mod 10;
c:=i mod 10;
if(i mod 20=0)and(a+b+c=i div 20)then writeln(i);
end;
end.
<span>ответ 180 т.к
180 делится на 20
сумма цыфр 180 равно 1+8+0=9
180/20=9
9=9</span>