Гуманитарию, информатика , ничего не понимаю в этой теме. "написать программу, который вводит в массив 10целых чисел и выводит на экран номера отрицательных элементов, сами эти элементы и их сумму. 3 5 -2 3 -7 12 -6 -8 7 -9"

👇

Увидеть ответ

Ответ:

liza1329

24.05.2020

Весь код в этом файле>>>>>>>>>

4,6(9 оценок)

Открыть все ответы

Ответ:

BrookIyn

24.05.2020

8. Информационный вес одной точки (бит) = объем файла(бит)/кол-во пикселей= (1*1024*1024*8)/(1024*512) = 16 бит

9. Количество пикселей на см: 600/2,54 = 236,22 (в 1 дюйме - 2.54 см)
Количество пикселей по высоте: 10*236,22= 2362
(и столько же получится по ширине)
Объем файла = общее кол-во пикселей*глубину цвета = 2362*2362*32= 178529408 бит = 22316176 байт = 21793 Кб= 21,28 Мб

10. Аналогично предыдущей задаче:
750/2.54= 295,27
32*295,27= 9448
9448*9448*64= 5712941056 бит= 714117632 байт= 697380,5 Кб = 681Мб

11. Вопрос не до конца сформулирован, видимо необходимо найти время передачи данных.

Тогда: время за которое передастся файл=объем файла (бит)/скорость передачи данных(бит/сек.) = (10*1024*1024*8)/2500000= 33,55 сек.

4,6(59 оценок)

Ответ:

rot3

24.05.2020

Program kurs;

{$APPTYPE CONSOLE

Uses SysUtils;

type //раздел описания типов данных

tArray=array [1..20,1..40] of byte; //описание типа двумерного

//массива 20x40 элементов

tArray2=array [1..400] of byte; // описание типа массива из 400

//элементов

var //раздел объявления переменных

A:tArray; //массив с результатами эксперимента

B:tArray2; //сформированный одномерный массив

n, //количество столбцов массива A

m, //количество строк массива A

k:byte; //размер массива B

d:byte; //количество искомых элементов

S:real; //среднее арифметическое элементов массива В

//

// Функция ввода массива. Возвращает размер массива n, m и //введенный массив Z

Function InputArray(var Z:tArray; var m, n:byte):boolean;

var

i,j:byte; // индексные переменные

begin

//вывод сообщения о вводе n

writeln('Введите размер массива n:');

//вводим n

readln(n);

…

end;

//Процедура вывода одномерного массива Y размерностью k

Procedure OutputArray(Y:tArray2; k:byte);

var i:byte; //индекс массива

begin

…

end;

//Процедура создания одномерного массива Y

//из двумерного Х по заданной схеме

Procedure Create(X:tArray; m:byte; n:byte; var Y:tArray2; var k:byte);

var

i, //индекс массива

j:byte; //индекс массива

l,t:byte; //индексы массива

s:set of byte; //множество элементов массива

f:boolean; //флаг наличия схожего элемента

//в нижней части массива

begin

…

end;

end; //конец процедуры

//Процедура поиска среднего арифметического

Function SrZnach(X:tArray2; n:byte):real;

var

i:byte; //индекс массива

Sr:real; //переменная для подсчета среднего арифметического

begin

…

end;

//Процедура подсчета в массиве Х элементов,

//которые отличаются от значения Sr больше чем на 50%.

//Возвращает количество искомых элементов k

Procedure Calc(X:tArray2; n:byte; Sr:real; var k:byte);

var

i:byte; //индексы массива

begin

i:=1; //задаем начальный индекс массива

k:=0;

…

end;

//начало основной программы

begin

…

end. //конец программы

4,7(52 оценок)

Это интересно:

Дом-и-сад

11.12.2022

Как избавиться от скунсов: лучшие способы...

Компьютеры-и-электроника

12.01.2021

Как произвести расчет заработной платы в Excel...

Здоровье

25.10.2020

Как выпустить кровь из отекшей ушной раковины ( капустное ухо )...

Мир-работы