daniil069531671
22.03.2022 12:00

Пять мальчиков Саша Ваня Коля Боря и Юра участвовали в соревнованиях по бегу . После окончания соревнований болельщики сказали об их результатахСаша был не первымВаня пришел к финишу третьимКоля пришел к финишу после СашиЮра не был последнимВаня и Коля всю дистанцию бежали рядом и только на финише один из них вырвался вперед. Расставьте мальчиков в том порядке в котором они финишировали. Объясните свое решение

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
lilikykytik21
28.02.2022 22:26

#include <iostream>

int main() {

const int SIZE = 10;

bool isSence = false;

int sum = 0;

int count = 0;

int arr[SIZE];

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

{

 arr[i] = rand() % 20 - 10; // "рандомно" заполняем массив от -10 до 10

 std::cout << arr[i] << "\t"; // выводим массив в консоль

 if (arr[i] >= 0)

  isSence = true;

}

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

{

 if ((isSence) && (arr[i] > 0))

  sum += arr[i]; //sum = sum + arr[i];

  count++;

}

if (isSence)

 std::cout << "\nсреднее арифметическое положительных чисел = " << double(sum) / count << std::endl; // явное приведение типов

else

 std::cout << "\nВ массиве нету положительных чисел или нету нулей и/или отрицательных чисел" << std::endl;

return 0;

}

0,0(0 оценок)
Ответ:
rimmarimma84
27.02.2023 01:36

---PascalABC.NET 3.6.2 ---

begin

 //Создадим переменную A типа List<integer>, задав в конструкторе ёмкость в 20 элементов;

 var A : List<integer> := New List<integer>(20);  

 A.AddRange(SeqGen(A.Capacity, p -> Random(-10, 10))); //Запишем в наш List последовательность, длина которой равна List<T>.Capacity, и каждый элемент в которой генерируется случайно в диапазоне [-10; 10]

 A.Println; //Распечатаем в консоль содержимое A

end.

Объяснение:

Заместо стандартного паскалевского массива использован класс List<T> библиотеки .NET Framework, являющийся аналогом обычного массива, но имеющий большее число методов для работы с ним.

А вообще, программа может быть написана в 1 строку:

begin

 ArrRandom(20, -10, 10).Println;

end.

0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота