7) 640*480=307 200 - всего пикселей
n=2^i
256=2^8
8 бит для кодирования одного пикселя
307200*8=2457600 бит для кодирования изображения
2457600/8/1024=300 Кб
8) 44100*16*23*60*2/8/1024/1024~232,15484619140625~232,2
Частота*разрядность*время в секундах*2(стерео) - объем в битах
объем в битах/8/1024/1024 - переводим в мегабайты
9) С такой задачей ни разу не встречался :/
Могу лишь предположить, что 4800*4=минимальная пропускная способность в битах. Если это так, то решение:
4800*4/8/1024=2,3 Кб
Но с 9 задачей я не уверен
Program Program1;
var
i,n,m,b:integer;
s,s1:string;
Begin
write('Введите значение m: ');
readln(m);
write('Введите значение n: ');
readln(n);
write('Введите значение b: ');
readln(b);
str(b,s);
for i:=m to n do
begin
str(i,s1);
if pos(s,s1)=0 then writeln(i);
end;
end.
Program SummaDrobi;
// это необязательная строчка с названием программы
var a, b, c, d, n, m: integer;
// это объявление 6-ти переменных целого типа для хранения данных
begin
writeln ('Сейчас присвоим 4-м переменным значения и найдём сумму 2 дробей:');
// это вывод на экран текста
a := 2; b := 5; c := 3; d := 7;
// это присвоение значений в переменные из самой
// программы (ввод данных с клавиатуры отсутствует)
writeln ('Первая дробь равна: ' ,a, '/', b, ', вторая дробь равна: ', c, '/', d);
// это уже вывод обработанной информации на экран
writeln ('Теперь найдём сумму дробей ');
n := a*d; m := c*b;
// это обработка данных перед выводом на экран
writeln ('Конечная несокращённая дробь равна: ', n+m, '/', b*d);
// это вывод на экран конечного решения
end.
Результат:
Сейчас присвоим 4-м переменным значения и найдём сумму 2 дробей:
Первая дробь равна: 2/5 вторая дробь равна: 3/7
Теперь найдём сумму дробей
Конечная несокращённая дробь равна: 29/35
5-15 градусов в случае если уровень глаз выше высоты центра экрана
регулярное архивирование файлов позволяет минимизировать ущерб от вирусной атаки. Основным средством защиты информации является резервное копирование ценных данных,которые хранятся на жестких дисках
