Нужна программа на pascalabc 1.нарисуйте блок-схему следующего алгоритма: 1)пользователь вводит размер целочисленного массива 2)программа выделяет память под данный массив 3)в цикле инициализируются значения всех элементов массива, причем для элементов с нечетным индексом организуется ввод значений пользователем, а для элементов с четным индексом значения случайным образом 4)полученный массив сортируется по возрастанию 5)результат сортировки записывается в файл. 2. на выбранном вами языке программирования разработайте программу, которая бы реализовала блок-схему, созданную вами в предыдущем . 3.на выбранном вами языке программирования постройте три класса ( базовый и 2 потомка), описывающих некоторых студентов. студентам назначается стипендия, при этом правила ее назначения различны для парней (один из потомков) и девушек ( второй потомок известны фио студентов, их пол, группа и средний . парням выплачивается фиксированная стипендия, если их средний выше или равен заданному пороговому значению в 4 , а девушкам стипендия выплачивается всегда и рассчитывается она путем умножения среднего на фиксированный коэффициент. создайте код, описывающий классы и их члены для моделирования этой ситуации. представьте сигнатуру метода расчета стипендии. программа нужна к 15.07.19
Ответы
A) объем звукозаписи (в битах) можно рассчитать умножив частоту дискретизации(гц) на глубину кодирования (бит) и на время (в сек.) 24000*16*(7*60)= 161280000 бит 161280000/8/1024/1024 = 19,23 мбайт ответ: 19,23 мбайт б) определим глубину кодирования i по формуле: n=2^i, где n - количесвто уровней громкости 16177216=2^i i=24 бит тогда объем звукозаписи рассчитаем перемножив частоту дискретизации, глубину кодирования и время. 41000*24*(3*60)= 177120000 бит 177120000/8/1024/1024= 21,11 мбайт ответ: 21,11 мбайт
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
ответ:
const n=13;
var a: array [1..n] of integer;
i,s,k: integer;
begin
write('введите ',n,' элементов массива через пробел: ');
for i: =1 to n do read(a[i]);
write ('массив: ');
for i: =1 to n do write(a[i],' ');
writeln;
for i: =1 to n do s: =s+a[i];
writeln('среднее арифметическое всех элементов массива равно: ',s/n: 0: 3);
for i: =1 to n do if a[i]> s/n then k: =k+1;
write('элементов массива больших среднего арифметичского всех элементов массива: ',k);
end.
объяснение: