Var a.b.c,d: integer;
begin
Write('Введите число a'); readln(a);
Write('Введите число b'); readln(b);
Write('Введите среднее геометрическое чисел а и b'); read(c);
d:=sqr(a*b);
Write(c=d);
end.
Задание 1. x = log(2,4096) = 12 бит
Информационный объем I = 256 Гц * 12 бит * 10 * 60 с = 1843200 бит = 230400 байт = 225 Кбайт
Ответ 4) 225
<em /><em />
Задание 2 Информационный объем I = 16000 Гц * 24 бит * 5 * 60 с * 2 (стерео) = 230400000 бит = 28800000 байт = 28125 Кбайт = 27,4658203125 Мбайт
Ответ 2) 30 Мбайт
Программа и пример её выполнения - в прилагаемом файле.
+1, +2, +3, +4 арифметическая прогрессич
<span>Правильный ответ 7. Алгоритм считает сколько
исполнителей набрали меньше 25 голосов. Это 1-й,2-й,3-й,5-й,6-й,8-й,9-й
всего таких - 7</span>