Одномерный массив Х(8) задать по формуле X[i]=ln(i+0,1). Найти количество элементов, удовлетворяющих условию-0,5<sin(xi)≤0,
10-11 класс
|
минимальный элемент.
#include <cmath>
int main()
{
double X[8];
Другие вопросы из категории
Читайте также
2. Задать двумерный массив (4х4) случайными значениями от 12 до 18 включительно. Вывести сумму значений элементов каждого столбца матрицы.
3. Задать двумерный массив (7х7) случайными значениями от 12 до 18 включительно. В каждом столбце матрицы найти количество элементов, значения которых меньше 14.
4. Задать двумерный массив (3х3) с клавиатуры, поменять значения элементов 1 столбца со вторым.
5. Найти минимальный элемент матрицы (5х5), заданной случайными значениями от 1 до 5 включительно, лежащие ниже главной диагонали.
программу.....плиз....помогите
тке полученных компонентов массива. Исходными данными являются одномерный массив, элементы которого задаются с помощью датчика случайных чисел от -50 до +50 и целое положительное число К
спирали в очередной элемент одномерного массива ( начиная с первого) он записывал элемент матрицы с нечетной суммой индексов. Затем, двигаясь в обратном направлении по этой же спирали, последовательно записывал в одномерный массив элементы матрицы с четной суммой индексов. Сколько четных элементов одновременно массива стоят на нечетных местах?
А) 8 Б) 2 В) 16 Г) 4
1 2 3 4
8 7 6 5|
9 10 11 12
16 15 14 13
расположенных между максимальным и минимальным элементами.
Дан одномерный массив, состоящий из вещественных элементов. Найти произведение элементов массива, расположенных между максимальным по модулю и минимальным по модулю элементами
ну или исправьте мое пжл
program fgf;
var mas:array[1..100] of real;
max,min:real;
i,n,c,b:shortint;
p:real;
f1,g:text;
begin;
assign (f1, 'input.txt');
reset (f1);
readln (f1, n);
for i:=1 to N do read (mas[i]);
max:=mas[i];
for i:=2 to N do begin
if mas[i]>max then begin
max:=mas[i];
c:=i;
end;
end;
min:=mas[1];
for i:=2 to N do begin
if mas[i]<min then begin
max:=mas[i];
b:=i;
end;
end;
close(f1);
assign (g, 'output.txt');
rewrite (g);
p:=1;
if b<c then I:=b+1 and c-1
else for I:=c+1 to b-1 do p:=p*mas[i];
if (n<3) or (b+1=c) or (c+1=b) then writeln(g,'0.00') else write(p:3:3) ;
close (g);
end.