Записать в с++ a=sin 2/x + 1/3cos 4/x-3/x+1/5 я написала так, но мне кажется, считает неверно: # include # include main (void) { float x, y ; printf ("vvedite peremennuju 'x'\n"); y = sin(2/x)+1/3*cos(4/x)-3/x+1/5; scanf ("%f", & x); printf ("%f" , y); return 0; }

# include math.h

# include stdio.h

# include conio.h

main (void) {

float x, y ;

printf ("vvedite peremennuju 'x'\n");

scanf ("%f", & x); - сначала нужно считать переменную

y = sin(2/x)+1/3*cos(4/x)-3/x+1/5;

printf ("%f" , y);

return 0; }

Const n=10; var    k,l,m,i,j: integer;   var a: array[1..n] of integer; begin   k: =0; m: =0; j: =0; l: =0;   for i: =1 to n do begin     a[i]: =random(10);     write (a[i]: 3);     if (i> 1) and (a[i]> =a[i-1])        then begin k: =k+1; j: =i; end       else          if (k> 0) and (k> l)            then begin l: =k; m: =j; k: =0 end           else k: =0;   end;   if (k> 0) and (k> l)      then begin l: =k; m: =n end;     writeln;   writeln;   for i: =m-l to m do      write (a[i]: 3);   l: =l+1;   writeln;   writeln ('длина = ',l) end. :   9   2   5   0   8   5   7   7   3   7   5   7   7 длина = 3 * рандомный ввод массива можно заменить обычным с клавиатуры

// pascalabc.net 3.2, сборка 1362 от 14.12.2016 // внимание! если программа не работает, обновите версию! const   n=34; begin   // 1   var r: =arrrandom(n,-8,8); r.println;   // 2   var b: =r.slice(trunc(0.75*n)-1,3);   writeln('ср.гармоническое= ',b.count/b.aggregate(0.0,(x,y)-> x+1.0/y));   // 3   var m: =r.batch(n div 3).toarray[1].where(x-> x.iseven).minby(x-> abs(x));   writeln('минимальный по модулю= ',m);   // 4   var r2: =r.select((x,i)-> (x,(n div 2).toarray;   var r21: =r2[0].where(x-> x[0]< 0).orderby(x-> sqr(x[0]));   var ind: =r21+r2[1].where(x-> x[0]< 0).orderby(x-> sqr(;   var ind1: =ind.unziptuple;   var aval: =ind1[0].toarray;   var aind: =ind1[1].sorted.toarray;   for var i: =0 to aval.count-1 do r[aind[i]]: =aval[i];   r.println end. пример 8 -3 2 -2 6 6 7 6 -7 -5 -4 6 2 2 1 1 -6 1 -1 -5 8 4 1 7 1 1 2 -8 -8 1 -7 1 8 -6 ср.гармоническое= 7.07368421052631 минимальный по модулю= 2 8 -2 2 -3 6 6 7 6 -4 -5 -6 6 2 2 1 1 -7 1 -1 -5 8 4 1 7 1 1 2 -6 -7 1 -8 1 8 -8