Сколько поместиться на cd, dvd-диске , флэш накопителе: а) 40 строк текста по 50 символов в строке в кодировке юникод. б) изображение 200 на 100 точек с палитрой 16 777 216 цветов в) звукозапись среднего качества с частотой дискретизации 24000 гц и глубиной кодирования 16 битов.

а) 40*50 =  2000 симв

юникод - символ = 2 байта

2000 * 2 = 4000 байта 

 

б) 200*100 =  20000 пикс.

16 777 216 цветов = 24 бита = 3 байта.

20000*3 = 60000 байт

 

в) сколько длится звукозапись? не достаточно данных.

Var   mas: array[1..15] of integer;   i, v, q: integer; begin   randomize;   q: =100;   mas[1]: =random(q);   for i: =2 to 15 do begin       repeat         v: =random(q);         if v< nas[i-1] then inc(q, 20);       until v> mas[i-1];     end;   mas[i]: =v;     writeln('полученный массив');   for i: =1 to 14 do       write(mas[i],',  ');   write(mas[15]); end. полученный массив 15,  18, 19, 25, 48, 49, 51, 60,  65, 90, 91, 98, 125, 140, 150

//pascal var   a: array[1..4, 1..5] of byte;   i, j: byte; begin for i : = 1 to 4 do begin   for j : = 1 to 5 do   begin       if i mod 2 = 0 then       begin           if j mod 2 = 0 then a[i, j] : = 1           else a[i, j] : = 0;           end           else           begin           if j mod 2 = 1 then a[i, j] : = 1           else a[i, j] : = 0;           end;             write(a[i, j]: 3);     end;     writeln; end;         end.