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

Массив из 15 чисел задан датчиком случайных чисел на интервале (-18;37) заменить нулями все отрицательные элементы

👇
Ответ:
норрд
норрд
04.07.2020

var f:array[1..15] of integer;

i:integer;

begin

 randomize;

 for i:=1 to 15 do

 begin

   f[i]:=random(-18,37);

   if f[i]<0 then f[i]:=0;

   write(f[i],' ');

 end;

end.

Объяснение:

34 0 0 4 25 4 0 0 25 0 36 4 0 36 25

4,4(17 оценок)
Ответ:
liza5634
liza5634
04.07.2020

===== PascalABC.NET =====

begin

 var a := ArrRandom(15, -18, 37);

 a.Println;

 a.Transform(p -> p < 0 ? 0 : p);

 a.Print

end.


Массив из 15 чисел задан датчиком случайных чисел на интервале (-18;37) заменить нулями все отрицате
4,7(72 оценок)
Открыть все ответы
Ответ:
August333
August333
04.07.2020
Возможно, не самое эффективное решение
#include <iostream>
#include <cstdlib>
#include <ctime>
int main()
{
    using namespace std;
    const int N = 10;
    int A[N];
    srand(time(0));
    for (int i = 0; i < N; ++i)
        A[i] = rand() % 201 - 100;
   
    //Вывод исходного массива на экран
    for (int i = 0; i < N; ++i)
        cout << A[i] << "  ";
    cout << endl;

    //Подсчитаем количества положительных и отрицательных
    int kpos = 0, kneg = 0;
    for (int i = 0; i < N; i++)
        if (A[i] > 0)
            ++kpos;
        else
            ++kneg;

    int * Apos = new int[kpos];
    int * Aneg = new int[kneg];
    int pos = 0, neg = 0;
    for (int i = 0; i < N; ++i)
        if (A[i] > 0)
            Apos[pos++] = A[i];
        else
            Aneg[neg++] = A[i];

    for (int i = 0; i < N; ++i)
        if (i < kpos)
            A[i] = Apos[i];
        else
            A[i] = Aneg[i - kpos];

    delete[] Apos;
    delete[] Aneg;

    //Вывод полученного массива на экран
    for (int i = 0; i < N; ++i)
        cout << A[i] << "  ";
    cout << endl;
    return 0;
}
4,6(81 оценок)
Ответ:
xhhxjdjdj4
xhhxjdjdj4
04.07.2020
1)файл-Специально организованная структура данных, распознаваемая компьютером как единое целое или Файл — это информация, хранящаяся в долговременной памяти как единое целое и обозначенная именем.
2)Имя файла — строка символов, однозначно определяющая файл в некотором пространстве имён файловой системы, обычно называемом каталогом, директорией или папкой.
3)размеры файлов - не совсем понял, но вообще размер файла измеряется в основном в бит, байт, килобайт, мегабайт, гигабайт, терабайт, далее в основном не встречаются. еще есть килобит, мегабит, гигабит, на счет последнего не знаю, никогда не встречал.
4)Папка-это объект в файловой системе, упрощающий организацию файлов. Типичная файловая система содержит большое количество файлов, и каталоги упорядочить её путём их группировки.
5)иерархия папок- это порядок последовательного расположения папок 
6)объекты операционной системы- Контекстное меню,Ярлык, пиктограмма(она же иконка), Рабочий стол, Папка, Диалоговое окно, Окно. Вообще их много, но основные я назвал.
4,6(41 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
Полный доступ к MOGZ
Живи умнее Безлимитный доступ к MOGZ Оформи подписку
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ