На магнитном диске объемом 30 мбайт записана книга. в книге 1552 стра-ницы. из них страниц с текстом на 752 больше, чем страниц с рисунками. страница с текстом содержит 640 символов. все рисунки восьми цветные и имеют единый формат. каков размер рисунков?

X+x+752 = 1552 x = 800/2 = 400 страниц с рисунками y = 1152 страниц с текстом итого символов (а значит и байт) в виде текста = 1152*640 = 737280 = 720 кб на рисунки остается 30*1024-720 = 30000 кб и страниц с ними 400, значит на каждый рисунок приходится по 30000 / 400 = 75кб = 76800б = 614400 бит для кодирования восьмицветного изображения требуются 3 бита памяти на один пиксель. итого в рисунке 204800 пикселей. какой размер?   любой, где x*y < = 204800) квадратный корень - число нецелое. если квадратные - то максимальный размер 452 х 452 пикселей

          program al;           var n,i: integer;           k,b,a1,p: integer;                       s: real;             begin            writeln('n=');           readln     (n);                       a1: =2;           b: =3;     p : = 1;     s: =0;         for i: =1 to n do   begin       p : = p * a1;       a1 : = a1 + b;     end;     for i: = 1 to n do begin    k: =   2*a1+b*(n-1);     s: =(k/2)*n;             end;   writeln('proizvedenie: ',p ,' summa=',s);   readln; end.

  program al;   const n=5;   const k=5;   var b: array[1..n] of integer;         a: array[1..k] of integer;       i,s1,s2: integer;         begin              write('vvedite balli 1 sportsmena=');         for i : = 1 to n do      readln(b[i]);         writeln ('vvedite balli vtorogo sportsmena=');       for i: = 1 to k do        readln(a[i]);         s1: =0;       s2: =0;         for i: = 1 to n do        s1: =s1+b[i];         for i: = 1 to k do      s2 : = s2+a[i];         writeln ('s1=',s1,'s2=',s2);         readln;     end.