М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
ShurenkoPasha12
ShurenkoPasha12
17.10.2020 18:27 •  Информатика

Заполнить одномерный целочисленный массив, десятью произвольными числами из диапазона от 0 до 25 ,найти минимальный элемент массива и его номер, заменить все отрицательные элементы массива на противоположные

👇
Ответ:
Cheburek1112
Cheburek1112
17.10.2020
Скорее всего задание некорректное: так как не бывает отрицательных значение в диапазоне от 0(нуля) до 25. Предположим, что отрицательные значения элементов присутствуют, тогда как считать их вначале минимальными или делать противоположными а потом сравнивать. Ведь -25 и 25 разные значения по определению. Если в массиве не один минимальный элемент а два или более, какой индекс минимального элемента брать первый, последний или где-то в середине массива. На будущее пишите язык программирования, на котором необходимо реализовать программу.

Программа написана на Паскале.
Ищется индекс первого минимального значения массива.
Код замены отрицательных элементов массива и замены их на противоположные тоже включил. Но вначале считает значение элемента на минимум затем заменяет его на противоположный.

//
// Написал GonanSoft
//
var 
  da : array[1..10] of Integer;  //  da - DimensionalArray (одномерный массив) 
  i : Integer;    // Рабочая переменная цикла 
  i_min : Integer;  // индекс минимального элемента массива

//Заполняем элементы массива da десятью произвольными числами из диапазона от 0 до 25
Randomize;
for i := 1 to 10 do 
begin
  da[i] := Random(26);
end;

i_min := 1;  // Изначально считаем значение первого элемента массива минимальным
for i := 1 to 10 do
begin
  // Выполняем поиск минимального элемента массива
  if (da[i]<da[i_min]) then
  begin
    i_min := i;
  end;
  //Заменяем все отрицательные элементы массива на противоположные
  if (da[i]<0) then
  begin
    da[i] := Abs(da[i]);
  end;
end;

// Вывод результата
Writeln('Минимальный элемент массива ' + inttostr(da[i_min]));
Writeln('Индекс минимального элемента массива ' + inttostr(i_min));
//
4,6(46 оценок)
Открыть все ответы
Ответ:
hmelova
hmelova
17.10.2020
const  A = 1.5; X1 = -2*A; dX = A/5; var x,y :real; beginx := X1;repeatif x<0 then y := Power(3,1/3)*A*(1-sqrt(-power(x,3))) else y := sqrt( sqrt( 16*power(A,4) + 4*sqr(a)*sqr(x) ) - sqr(x) - sqr(A) ); writeln('x:',x:6:2,'y:',y:6:2); x := x + dX;until real.IsNaN(y);end.

Объяснение:

sqr(x) -- квадрат x.

sqrt(x) -- квадратный корень x.

power(x, y) -- x в степени y.

real.IsNaN(x) -- x не является числом (условие).

В задании нет конечного значения x, поэтому поставил условие на NaN, так как начиная с x=3.60, y перестаёт вычисляться (квадратный корень не извлекается).

Алгоритм можно написать по выше данному коду.

Пример работы:

"Ой! Картинка отличная, но произошла ошибка загрузки попробуйте еще раз."

4,4(71 оценок)
Ответ:
milk051
milk051
17.10.2020

#include <iostream>

#include <ctime>

#define r 25

#define c 36

signed main()

{

setlocale(LC_ALL, "Rus");

srand(time(NULL));

int _counter = 0;

int matrix[r][c];

for (int i = 0; i < r; i++) {

 for (int j = 0; j < c; j++) {

  matrix[i][j] = rand() % 2;

  std::cout << matrix[i][j] << " ";

 }

 std::cout << std::endl;

}

for (int j = 0; j < c; j++)

 if (matrix[11][j] == 1)

  _counter++;

std::cout << "\nКоличество проданных билетов в 12-м ряду: " << _counter << std::endl;

}

4,5(85 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ