1) N = 2^i 256 = 2^i i = 8 бит глубина кодирования одной буквы из 256-символьного алфавита 2) 30 * 70 * 5 = 10500 символов всего на 5 страницах текста 3) 10500 * 8 бит = 84000 бит нужно для кодирования всего текста 84000 / 8 = 10500 байт / 1024 = 10,25 Кбайт Ответ: 10,25 Кбайт нужно для кодирования всего текста
Var a: array[1..100] of integer; i,n,c,h: integer; begin writeln('Введите кол-во элементов последовательности:'); readln(n); writeln('Введите последовательность:'); for i:=1 to n do begin read(a[i]); if a[i]<0 then begin c:=c+a[i]; h:=h+1; end; end; writeln(c/h); <span> end.</span>
Самые основы паскаля. Советую почитать учебник и разобраться, т.к. дальше будет только сложнее.
var hig, age: integer; begin write('Введите рост ученика: '); readln(hig); write('Введите возраст ученика: '); readln(age); if (hig<160) or (age<13) then writeln('Не может заниматься') else writeln('Может заниматься'); <span>end. </span>