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

Напишите программу в КУМИРЕ для определения положительное или отрицательное число. ​

Показать ответ
Ответ:
Lezgin228
Lezgin228
21.08.2022 21:57

Так как изначально в задании указано : "на любом известном вам языке программирования" - вот, держи на С.

#include <stdio.h>

#include <stdlib.h>

#include <locale.h>

#define N 100

int main()

{

setlocale(LC_ALL, "Rus");

int i, M;

float B[N], MIN;

printf(" Введите количество элементов массива (не больше 100) => ");

scanf("%d", &M);

if (M < 100)

{

for (i = 0; i < M; i++)

{

printf("Введите [%d] элемент массива =>", i);

scanf("%f", &B[i]);

}

for (i = 0; i < M; i++)

printf("%1.0f ", B[i]);

MIN=B[0];

for (int i=1; i<M; i++)

{

if (B[i]<MIN)

MIN=B[i];

}

printf ("\n\tМинимальное значение в массиве => %7.2f", MIN);

}

else

printf("Ошибка. Заданное число элементов массива слишком большое.");

return 0;

}

0,0(0 оценок)
Ответ:
ivanochka02kasik
ivanochka02kasik
29.10.2021 16:11

#include <iostream>

#include <ctime>

using namespace std;

int main()

{

   setlocale(LC_CTYPE, "Rus");

   srand(time(0));

   int n,min=RAND_MAX,nl=0, j = 0;

   cout << "Размер массива: "; cin >> n;

   int *a = new int[n];

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

      a[i] = rand() % 10;

      cout << a[i] << ' ';

      if ((a[i] < min)&&((i+1)%2!=0)) min = a[i];

   }

   for (int i = 0; i < n; i++) if (a[i] == min) nl++;

   cout << endl;

   while (j < n-nl)

      if (a[j] == min)

          for (int i = j; i < n - 1; i++) swap(a[i], a[i + 1]);

      else j++;

   for (int i = 0; i < n - nl; i++) cout << a[i] << ' ';

   cout << endl;


   system("pause");

   return 0;

}

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