Я так понимаю, массив должен быть заполнен случайными числами? Если нет - отпишите в комментариях, скину код, где элементы массива вводятся с клавиатуры
При копировании кода из IDE на сайт автоматически убирается перенос строки. Будет прикреплен скриншот с тем, как должен выглядеть код
#include <stdlib.h>#include <stdio.h>#include <locale.h>
void main(){ setlocale(LC_ALL, "RUSSIAN"); int mas[11], i, ad, ben; ad = 0; ben = 0; srand(8120); for (i = 1; i <= 10; i++) //цикл заполнения массива случайными числами mas[i] = rand() % 200 - 100; for (i = 1; i <= 10; i++) //цикл вывода массива на экран { printf("%2d ", mas[i]); if (i % 5 == 0)printf("\n"); } for (i = 1; i <= 10; i++) // цикл подсчета количества отрицательных и положительных элементов массива { if (mas[i] > 0)ben++; if (mas[i] < 0)ad++; } printf("\n Количество положительных чисел: %2d", ben); printf("\n Количество отрицательных числе: %2d", ad); printf("\n\n"); system("pause");}
Вместо слов тип укажешь real если массив действительных чисел или integer - если целые числа
var a: array[1..10] of тип
i,n:integer; max, min, sum: тип
begin
write('Введите количество элементов массива'); readln(n);
for i:=1 to n do read(a[i]);
max:=a[1]; min:=a[1];
for i:=2 to n do if a[i]>max then max:=a[i];
for i:=2 to n do if a[i]>min then min:=a[i];
sum:=0;
for i:=1 to n do if (a[i]>min) and (a[i]<max) then sum:= sum+a[i];
write('Сумма элементов массива расположенных между максимальным и минимальным = ', sum);
end.
Cos2x=sinx-cosx
<span>cos²x-sin²x+(cosx-sinx)=0 </span>
<span>(cosx-sinx)(cosx+sinx)+(cosx-sinx)=0 </span>
<span>(cosx-sinx)(cosx+sinx+1)=0 </span>
<span>cosx=sinx => x=π/4+πn </span>
<span>cosx+sinx=-1 </span>
<span>sin(x+π/4)=-1/√2 </span>
<span>x+π/4=(-1)^(n+1) π/4+πk </span>
<span>x=-π/4+(-1)^(n+1) π/4+πk</span>
===== PascalABC.NET =====
begin
var x := ReadReal('x =');
var y := x * x + 1.8;
var k: real;
if y < 10 then
k := Sin(y)
else if y > 20 then
k := Tan(y)
else
k := y * y;
Print(k)
end.
