#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;
}
Program odin;
var a,b,c,d:integer;
x,y:integer;
begin
readln(a,b,c,d);
x:=a+b+c+d;
y:=a*b*c*d;
writeln('сумма чисел = ', x);
writeln('произведение чисел = ', y);
end.
// ------------------------------------------
program dva;
const p=3.14;
var r:integer;
s:real;
begin
writeln('Введите радиус ');
readln(r);
s:= pi * r * r;
writeln('Площадь круга = ', s);
end.
#include <iostream>
#include <cstdlib>
#include <vector>
using namespace std;
int main()
{
vector<int> v;
cout <<"Укажите размер массива: ";
int s;
cin >>s;
srand(time(0));
for(int i=0; i!=s; ++i)
v.push_back(rand()\%100);
int find;
cout <<"Введите число для поиска: ";
cin >>find;
bool founded = false;
for(auto it=v.begin(); it!=v.end(); ++it)
if(*it==find) founded=true;
if(founded)
cout <<"Это число есть в массиве!" <<endl;
else cout <<"Такого числа нет в мвссиве!" <<endl;
return 0;
}
Нууууу очень сложно это гужно поискать в интернете
Задание 1
var i : integer;
begin
for i := 4 to 9 do writeln(i,'*',i ,' - ',i*i);
end.
Задача 3
Var n,m,p,k:integer;
Begin
write('n=');
read(n);
m:=n;k:=0;
while m<>0 do
begin
p:=m mod 10;
K:=K+1;
m:=m div 10;
end;
writeln('k=',k);
end<span>.
</span>