Программа вычитает из первого числа второе: Var a,b,c: real; Begin Writeln ('введите два числа'); Readln (a,b); S:=a-b; Writeln (a,'-',b,'=',s) End. . Пример работы программы: введите два числа 15.67 12.45 15.67-12.45=3.22
Const n = 5; var i: integer; a: array[1..n * 2 + 1] of integer; begin writeln('исходный массив: '); for i : = 1 to 2 * n do begin a[i] : = random(99) + 1; write(a[i] : 5); end; for i : = 2 * n + 1 downto n + 1 do a[i] : = a[i - 1]; a[n + 1] : = 0; writeln(); writeln('полученный массив: '); for i : = 1 to 2 * n + 1 do write(a[i] : 5); end.
Если было роздано 8100 МБайт, а скорость раздачи втрое меньше скорости скачивания (15/5=3), то скачано было 8100*3=24300 МБайт. Определим величину видеопотока данных. 1920*1080*2*18=74649600 (Байт/с) = 74649600/2^20=71.19 (МБайт/с) В этом выражении 2 Байта- это 16/8 бит глубины цвета. Определим величину аудиопотока данных. Для хранения отсчета при 4096 уровнях квантования требуется 12 бит (2^12=4096). Упаковки нет, поэтому будет использовано целое число байт - 2. Тогда аудиопоток составит 192000*2*48=18432000 (Байт/с)=18432000/2^20=17.58 (МБайт/с). Суммарный поток 71.19+17.58=88.77 (Мбайт/с) Тогда длительность видеоролика составит 24300/88.77 ≈ 273.7 (c)
