Все категории

4 года назад

Какими системами счисления пользуются люди???Пожалуйста помогите)

Знания

Информатика

1 ответ:

Кабарова4 года назад

0 0

Позиционная система Двоичная система счисления Троичная система счисления

Четверичная система счисления

Восьмеричная и шестнадцатеричная системы счислений

Читайте также

Задание №1. Производится одноканальная (моно) звукозапись с частотой дискретизации 256 Гц. При записи использовались 4096 уровне

ЛенаЯровая

Задание 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 Мбайт

0 0

4 года назад

Составить программу вывода на экран суммы удвоенных четных чисел из диапазона от 3 до 34 (Pascal ABC) СРОЧНО!!!!!!!!!!!!!!!!!!

maks2014 [14]

var

k, s: integer;

begin

s:=0;

for k:=3 to 34 do

if k mod 2= 0 then

s:= s+2*k;

writeln(s);

end.

0 0

4 года назад

Определить количество положительных чисел из 2 чисел, вводимых с клавиатуры

Pakohontas

Ответ:

var

a, b: Real;

c : Integer;

begin

Write ('A, B = ');

ReadLn (a, b);

c := 0;

if a > 0 then

Inc (c);

if b > 0 then

Inc (c);

WriteLn ('Количество положительных = ', c);

ReadLn;

end.

0 0

4 года назад

2. для какого из указанных значений Х истинно высказывание:

Юличка-1991

Верный ответ 4 .........

0 0

4 года назад

Написать программу.Даны два числа а и б, наибольшее из них умножить на 10, а наименьшее разделить на 10

Глеб Печеный

Var a,b: Real;
begin
writeln('Введите a и b');
readln(a,b);
if a>b then
begin
a:=a*10;
b:=b/10;
end;
if a<b then
begin
b:=b*10;
a:=a/10;
end;
if a=b then
begin
b:=b*10;
a:=a*10;
end;
writeln('a: ',a);
writeln('b: ',b);
end.

0 0

4 года назад