1перевести число а10=241 в двоичную, восьмеричную и шестнадцатеричную систему счисления. с решением, ! 2 3.информационное сообщение объемом 4 кбайта содержит 4096 символов. сколько символов содержит алфавит, при которого было записано это сообщение? 4.битовая глубина равна 32, видеопамять делится на две страницы, разрешающая способность дисплея — 800×640. вычислить объем видеопамяти. 5.объем свободной памяти на диске — 0, 1 гб, разрядность звуковой платы — 16. какова длительность звучания цифрового аудиофайла, записанного с частотой дискретизации 44100 гц? с решением !
Ответы
// pascalabc.net 3.0, сборка 1088 const n=30; var a: array[1..n] of integer; i,k: integer; begin randomize; writeln('*** исходный массив ***'); k: =0; for i: =1 to n do begin a[i]: =random(1001); write(a[i],' '); if (a[i] mod 3 = 0) and (a[i] mod 10 = 1) then inc(k) end; writeln; writeln('количество найденных элементов равно ',k) end. тестовое решение: *** исходный массив *** 503 187 764 452 351 819 339 940 681 369 938 874 639 212 633 825 983 830 121 801 889 36 479 14 357 382 631 8 402 61 количество найденных элементов равно 3
// pascalabc.net 3.0, сборка 1088 const n=6; var a: array[1..n] of integer; i: integer; begin randomize; writeln('*** исходный массив ***'); for i: =1 to n do begin a[i]: =random(1001); write(a[i],' '); end; writeln; writeln('*** результат ***'); write(a[1],' '); for i: =2 to n-1 do begin if odd(a[i]) then a[i]: =a[i]+a[n] else a[i]: =a[i]+a[1]; write(a[i],' '); end; writeln(a[n]) end. тестовое решение: *** исходный массив *** 706 46 715 899 103 308 *** результат *** 706 752 1023 1207 411 308
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Популярные вопросы в разделе
Расскажи про табло данными которого тебе приходилось пользоваться
Автор: Екатерина
Что означает запись f: / изображения/ фото/ klass.jpg
Автор: kassel1b
Напишите код программы которая будет вычислять дробь а/б
Автор: lubavarif83