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

Перевести числа в десятичную систему счисления: из двоичной системы счисления число 16;
из восьмиричной системы счисления число 251;
из шестнадцатиричной системы счисления число 547

👇
Ответ:
nikitanosach2901
nikitanosach2901
09.12.2021

равно минут 5 10 5 минута час 56

4,5(2 оценок)
Открыть все ответы
Ответ:
Динка105
Динка105
09.12.2021

Код программы:

#include <iostream>

#include <locale>

#include <time.h>

using namespace std;

void rand_mas(int *mas, int n) {

srand(time(NULL));

int a = -30, b = 30;

for (int i = 0; i < n; i++)

 mas[i] = a + rand() % (b - a);

}

int min_mas(int *mas, int n) {

int min = mas[0];

for (int i = 1; i < n; i++) {

 if (min > mas[i])

  min = mas[i];

}

return min;

}

int main()

{

setlocale(LC_ALL, "Russian");

int *A, N, min, *temp;

cout << "Введите количество элементов в массиве" << endl;

cin >> N;

A = new int[N];

rand_mas(A, N);

cout << "Исходный массив: " << endl;

for (int i = 0; i < N; i++)

 cout << A[i] << ' ';

min = min_mas(A, N);

temp = A;

A = new int[N + 1];

A[0] = min;

for (int i = 1, j = 0; i < N; i++) {

 if (temp[j] == min) {

  ++j;

  A[i] = temp[j];

  ++j;

  continue;

 }

 A[i] = temp[j];

 ++j;

}

cout << "\nИзмененный массив: " << endl;

for (int i = 0; i < N; i++)

 cout << A[i] << ' ';

return 0;

}

4,4(17 оценок)
Ответ:
ано6
ано6
09.12.2021
Все решения даны в системе  программирования
PascalABC.NET 3.2, сборка 1382 от 06.02.2017

Если программа не работает, обновите версию!

№1
begin
  var a:=ReadArrInteger('Вводите числа:',ReadInteger('n='));
  var im:=a.IndexMax;
  Writeln('Максимальный элемент номер ',im+1,' равен ',a[im])
end.

Пример
n= 6
Вводите числа: 13 8 -15 0 16 -24
Максимальный элемент номер 5 равен 16

№2
begin
  var a:=ReadArrInteger('Вводите числа:',ReadInteger('n='));
  Sort(a,(x,y)->x>y);
  a.Println
end.

Пример
n= 5
Вводите числа: 5 -4 6 0 5
6 5 5 0 -4

№3
begin
  var a:=ArrRandom(ReadInteger('n='),-54,33); a.Println;
  Sort(a,(x,y)->x>y); a.Println
end.

Пример
n= 14
-2 2 -10 17 18 -3 24 -30 -42 12 -11 -53 13 21
24 21 18 17 13 12 2 -2 -3 -10 -11 -30 -42 -53

№4
begin
  var a:=ReadArrInteger('Вводите числа:',ReadInteger('n='));
  var b:=a.Where(x->x>0); b.Println
end.

Пример
n= 14
Вводите числа: -2 2 -10 17 18 -3 24 -30 -42 12 -11 -53 13 21
2 17 18 24 12 13 21
4,7(88 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ