Program faceyourseif;
var x,k,i:integer;
g:boolean;
begin;
x := Random(100);
writeln(x);
writeln('Компьер загадал число от 0 до 100');
writeln('Попробуйте его угадать');
repeat
writeln('Введите число');
read(k);
if k > x then
writeln('Не угадали! Загаданное число меньше');
if k < x then
writeln('Не угадали! Загаданное число больше');
if k = x then begin;
writeln('Поздравляю,вы угадали!');
g:=true;
end;
i:=i+1;
until g or (i=3);
end.
1024*512=524288 точек всего
1,5Мб = 1536 Кб = 1572864 байт = 12582912 бит
12582912 / 524288 = 24 бита на пиксель
N =
= 16777216 цветов
Var x,y,z,c:real;
begin
readln(x,y,z);
c:=exp(ln(2)*exp(ln(y)*x))+exp(ln(exp(ln(3)*x))*y);
c:=c-y*(arctan(z)-pi/6)/(abs(x)+1/(y*y+1));
writeln(c:8:6);
end.
Пример:3.251 0.325 0.466e-4
4.251433
Если 128*128 - разрешение, 8кбайт - объём, то возможно N - глубина
8*1024(*8 бит в байте)/(128*128) = 4 бита
Объем сообщения равен 11 Кбайт.сообщение содержит 11264 символов.Какова мощность алфавита?
Ответ: 256
Решение:
дано;
Y = 11 Кбайт
K = 11 264 Символов
Найти: N
1) N = 2i
2) Y = k * i , i = Y / k
Переведем 11 Кбайт в биты, и подставим в формулу:
11 * 1024 * 8 = 90 112 бит
3) 90 112 = 11 264 * i
i = 90 112 / 11 264
i = 8 бит
4) N = 2i
N = 28
N = 256
