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

Дан одномерный массив размерностью n, заполненный случайными числами в интервале от -15 до 20. вывести на экран значения элементов массива, абсолютное значение которых > 10.

👇
Ответ:
Lala0911
Lala0911
23.11.2021

Program abc;

Const n=35;

Var a, b:array[1.. N] of integer;

i, j:integer;

Begin

Randomize;

For i:=1 to N do

a[i]:= random (20)-15;

For i:=1 to N do

Write (a[i]:4);

j:=1;

For i:= 1 to N do

If a[i]>10 then

Begin

b[j]:=a[i];

Inc[j];

End;

For i:= 1 to N do

Write(b[i],' ');

Readln;

End.

Объяснение:могу быть не прав

4,6(25 оценок)
Ответ:
tanyaonuchkomailru
tanyaonuchkomailru
23.11.2021

C++

#include <iostream>

#include <ctime>

using namespace std;

int main() {

setlocale(LC_ALL, "Russian");

srand(time(NULL));

int arr[20],sum=0;

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

{

 arr[i] = rand() % 36+(-15);

}

cout << "Обычный массив -> ";

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

{

 cout << arr[i] << "  ";

}

cout << endl << "Элементы массива которые больше 10 ->";

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

{

 if (arr[i]>10) {

  cout << arr[i] << "  ";

 }

}

cout << endl;

 system("pause");

 return 0;

}

Объяснение:

4,8(62 оценок)
Открыть все ответы
Ответ:
Задание 1
Информационный объем I = 44100 Гц * 5 * 60 с * 16 бит = 211680000 бит = 26460000 байт = 25839,84375 Кбайт = 25,23422241210938 Мбайт

Задание 2
I = 1,3 Мбайт t = 1 мин Частота дискретизации v = 1,3 * 1024 * 1024 * 8 бит / 60 с / 8 бит = 22719,147 Гц

Задание 3
I = 5.1 Мбайт, t = 2 минуты, v = 22050 Гц Разрядность аудиоадаптера i = 5.1 * 1024 * 1024 * 8 бит / (2 * 60) с / 22050 Гц = 16,1685 бит (округленно 16 бит)

Задание 4
I = 0.01 Гбайт, i = 16 бит, v = 44100 Гц Время t = 0,01 * 1024 * 1024 * 1024 * 8 бит / 16 бит / 44100 Гц = 121 с (округляем до 120 с)
4,5(46 оценок)
Ответ:
vladduliman5
vladduliman5
23.11.2021

1)

var arr: array [1..12] of integer;

begin

 for var i := 1 to 12 do

   arr[i] := random(-48, -83);

   

 writeln(arr[3] + ' ' + arr[7] + ' ' + arr[11]);

end.

2)

var arr: array [1..9] of double;

begin

 for var i := 1 to 9 do

 begin

   arr[i] := random(15, 40);

   write(arr[i] + ' ');

 end;

 writeln();

 

 var max := arr[1];

 for var i := 2 to 9 do

 begin

   if max < arr[i] then

       max := arr[i];

 end;

 writeln('Max: ' + max);

end.

3)

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

begin

 for var i := 1 to 9 do

 begin

   arr[i] := random(-10, 35);

   write(arr[i] + ' ');

 end;

 writeln();

 

 write('Нечетные: ');

 for var i := 1 to 9 do

 begin

   if not arr[i] mod 2 = 0 then

       write(arr[i] + ' ');

 end;

end.

4,4(3 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ