Поиск интересной для пользователя информации. Распознавание данных об окружающем мире.
I_{1} [/tex]=8 бит
i_{2} [/tex]=16 бит
i_{3} [/tex]=24 бит
i_{4} [/tex]=32 бит
V=i*m*n
V_{11} [/tex]=i1*m1*n1=8*1280*768=7864320(бит)=983040(байт)=960(кбайт)
V_{12} [/tex]=i1*m2*n2=8*1366*768=8392704(бит)=1049088(байт)=1024,5(кбайт)
V_{13} [/tex]=i1*m3*n3=8*1024*768=6291456(бит)=786432(байт)=768(кбайт)
V_{21} [/tex]=i2*m1*n1=16*1280*768=15728640(бит)=1966080(байт)=1920(кбайт)
V_{22} [/tex]=i2*m2*n2=16*1366*768=16785408(бит)=2098176(байт)=2049(кбайт)
V_{23} [/tex]=i3*m2*n2=16*1024*768=12582912(бит)=1572864(байт)=1536(кбайт)
V_{31} [/tex]=i3*m1*n1=24*1280*768=23592960(бит)=2949120(байт)=2880(кбайт)
V_{32} [/tex]=i3*m2*n2=24*1366*768=25178112(бит)=3147264(байт)=3073,5(кбайт)
V_{33} [/tex]=i3*m3*n3=24*1024*768=18874368(бит)=2359296(байт)=2304(кбайт)
V_{41} [/tex]=i4*m1*n1=32*1280*768=31457280(бит)=3932160(байт)=3840(кбайт)
V_{42} [/tex]=i4*m2*n2=32*1366*768=33570816(бит)=4196352(байт)=4098(кбайт)
V_{43} [/tex]=i4*m3*n3=32*1024*768=25165824(бит)=3145728(байт)=3072(кбайт)
Program mm;
var a,x: integer;
begin
uses crt;
write('x');
readln(x);
a:=cos(x)+sqrt(x);
writeln('y= ', a:4:2);
readln; {возможно readkey, зависит от Паскаля}
end.
Вот значения при которых мы получим такой ответ:
9 10 11 12 13 14 15 16 17 18 19 20
Наибольшее = 20.
Прости, нашел я это глупым методом поставив цикл for k:0 to 1000000
и выводя все значения. Ибо нету времени разбираться... Не знаю так-же что такое longint , потом обязательно для себя рассмотрю что это :)
Вот пример того как я это нашел, хоть медот и тупой, но он работает:
var k, i,max,m : longint;
function f(n: longint): longint;
begin f := n * n * n;
end;
function g(n: longint): longint;
begin g := 3*n + 3;
end;
begin i := 1;
for k:=0 to 1000000 do begin
while f(i) < g(k) do i := i+1;
if i=4 then writeln(k);
end;
end.