Ввести четыре числа, найти сумму первых двух и произведение следующих двух чисел.

Uses crt; var a,b,c,d: integer; begin readln(a, b, c, d); clrscr; writeln(a + b); writeln(a * b); end.

35 - 10 = 25 чисел нужно для записи результата

2^ i = 25

i = 5

для кодирования 25 чисел нужно 5 бит

27 * 5 = 135 бит

ответ. 135 бит.

 

тогда наверное будет:

2^i = 35

i = 6 бит

27 * 6 = 162 бит

ответ. d) 162 бит

но это не верно. т.к. мы кодируем 25 числе, а не 35. возможно в ответах опечатка

 

Program grapho; uses crt ,graphabc; var xc ,yc ,r1 ,r2 ,rc ,ro ,n ,i ,x ,y : integer;     a : real; begin repeat write ( 'количество отверстий от 3 до 7 n=' ); read (n ); until n in [3..7 ]; clrscr; hidecursor; xc : =windowwidth div 2; yc : =windowheight div 2; r1 : = 50; r2 : = 150; rc : = 100; ro : = 30; a : =2 *pi /n; circle (xc ,yc ,r2 ); circle (xc ,yc ,r1 );   for i : =1 to n do   begin   x : =xc +round (rc * cos (a *i ) );   y : =yc -round (rc * sin (a *i ) );   circle (x ,y ,ro );   end; end.