На с++
#include <iostream>
#include <math.h>
using namespace std;
int main()
{
int n, i, j, k(0),s(0);
cout << "vvedite kol-vo elementv \n";
cin >> n;
int *a = new int[n];
cout << "zapolnite massiv \n";
for (i = 0; i < n; i++)
{
cout << "a[" << i << "]=";
cin >> a[i];
}
for (i = 0; i<n; i++) {
k = 0;
for (j = 0; j<n; j++)
if (a[i] == a[j]) k++;
if (k == 1)
s++;
}
cout << "otvet: " <<s << endl;
return 0;
}
var x,z:real;
begin
writeln('Вычислить значение выражения по формуле y= (1+sin(SQRT(x+1)))/(cos(12*z-4))');
write('Введите число X: '); readln(x);
write('Введите число Z: '); readln(z);
writeln('y= ',(1+sin(sqrt(x+1)))/(cos(12*z-4)):0:2);
end.
Program Pr1;
uses crt;
var x,y,z:integer;
a:real;
Begin
clrscr;
readln(x,y,z);
a:=(x+y+z)/3;
writeln(a:8:3);
a:=exp(1/3*ln(x*y*z));
writeln(a:8:3);
end.
// PascalABC.NET 3.1, сборка 1211 от 31.03.2016
begin
var a:=ArrRandom(10,-50,50); a.Println;
Writeln('Отрицательных ',a.Where(x->x<0).Count)
end.
<u><em>Тестовое решение:</em></u>
37 -20 2 -13 10 9 -25 11 8 -3
Отрицательных 4
Ответ:
Ответ к 1 заданию во вложении
2) Ответ 5, так как три столбика по 2,нам нужен еще один столбик по один(это вон те маленькие)
3) C1/2
Объяснение: