В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
lluukkaa
lluukkaa
29.10.2022 08:39 •  Информатика

Программирование 8 класс c++ Задан массив чисел в двоичной системе счисления. Упорядочить элемен-
ты массива по убыванию. Определить сумму чисел.

Показать ответ
Ответ:
inna0509781
inna0509781
20.11.2021 12:51

C++Выделить код

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

23

24

25

26

27

28

29

30

31

32

33

#include <iostream>

#include <cstdlib>

#include <ctime>

 

using namespace std;

 

int main()

{

 int N = 0;

 double mult = 1.0;

 

 srand(time(NULL));

 

 cout << "VVedite N =";

 cin >> N;

 

 int *mas = new int[N];

 

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

  {

   mas[i] = rand() % N;

    cout << "mas[" << i << "]= " <<mas[i] << endl;

    if(mas[i] % 2 != 0)

    {

     mult*=mas[i];

    }

  }

 

delete []mas;

cout << endl;

cout << "MULT = " << mult << endl;

   return 0;

}

Объяснение:

честно я не очень в этом шарю так что проверь )

0,0(0 оценок)
Ответ:
666666ник
666666ник
21.03.2020 22:32
//Знаю, что это решение далеко от понятия "изящество"
//Pascal ABC.NET v3.0 сборка 1111
var
 max1,max2,max3,i,maxi1,maxi2:integer;
 ar:array of integer;
begin
max1:=-2147483648;
max2:=-2147483648;
max3:=-2147483648;
setlength(ar,1);
readln(ar[0]);
i:=0;
 repeat
  inc(i);
  setlength(ar,i+1);
  readln(ar[i]);
 until ar[i]=0;
 for i:=0 to i do
 if ar[i]>max1 then
  begin;
   max1:=ar[i];
   maxi1:=i;
  end;
 for i:=0 to i do
 if (ar[i]>max2) and (i<>maxi1) then
  begin;
   max2:=ar[i];
   maxi2:=i;
  end;
 for i:=0 to i do
 if (ar[i]>max3) and (i<>maxi1) and (i<>maxi2) then max3:=ar[i];
write('Max1=',max1,' Max2=',max2,' Max3=', max3);
end.
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота