2 задача. I = 3 мб М = 4×64 (кол-во стр. всего) К = 128×96 ( кол-во символов или байтов на 1 стр) N -? ( мощность алфавита найти)
решение . переведем 3 мб в байты. 3мб*1024*1024 = 3145728байт
узнаем сколько байт на 1 стр К= 128*96=122 88 байт
узнаем сколько всего страниц М=4*64 = 256
нам понадобятся 2 формально 1) N = 2 ^i (два в степени i) 2) I = K *i *M I, I и М нам известны, поэтому из второй формулы выражаем неизвестную i и получаем вот такую формулу i= I/K*M поставляем i=3145728/(12288*256)=3145728/3145728=1
вернемся к первой формуле , так как N = 2 ^i, а i=1 , то двойка будет в первой степень и следует, что N =2, так как два в первой степени равно двум. из двух символов состоит алфавит.
2 задача. I = 3 мб М = 4×64 (кол-во стр. всего) К = 128×96 ( кол-во символов или байтов на 1 стр) N -? ( мощность алфавита найти)
решение . переведем 3 мб в байты. 3мб*1024*1024 = 3145728байт
узнаем сколько байт на 1 стр К= 128*96=122 88 байт
узнаем сколько всего страниц М=4*64 = 256
нам понадобятся 2 формально 1) N = 2 ^i (два в степени i) 2) I = K *i *M I, I и М нам известны, поэтому из второй формулы выражаем неизвестную i и получаем вот такую формулу i= I/K*M поставляем i=3145728/(12288*256)=3145728/3145728=1
вернемся к первой формуле , так как N = 2 ^i, а i=1 , то двойка будет в первой степень и следует, что N =2, так как два в первой степени равно двум. из двух символов состоит алфавит.
var a, b, c,d, x1, x2:Real;
begin
write('a=');ReadLn(a);
Write('b=');ReadLn(b);
Write('c=');ReadLn(c);
d:=sqr(b)-4*a*c;{вычислен дискриминант}
if d<0 then begin writeln('нет решения');break ;end;
if d=0 then begin WriteLn('Одно решение');WriteLn('x=' ,-b/(2*a));end;
WriteLn('x1=',(-b+Sqrt(d))/(2*a));
WriteLn('x2=',(-b-Sqrt(d))/(2*a));
readln;
end.
Объяснение:
Я профи в этом
Эта программа кроме дискриминанта ещё найдёт иксы к тому же если нет решения, программа напишет нет решения
Я смог