1)4*4=16, 2^4=16 ответ 4 бита
2)2^3=8; 2^7=128 событий
3)2^3=8 ответ 3 бит
4)2^7=128 ответ 7 бит
5)4/32=1/8; 2^3=8 ответ 3 бит
//Вариант 2
//Pascal ABC.NET v3.0 сборка 1111
Var
i,max,n,a:integer;
begin
readln(n);
max:=-2147483648;
i:=1;
while i<>n+1 do
begin;
readln(a);
if (max<a) and (a mod 2=0) then max:=a;
i:=i+1;
end;
write(max);
<span>end.
</span>
Пример ввода:
4
1
2
3
4
Пример вывода:
4
PascalABC.NET
-----------------------------
var
a: array[1..10000] of integer;
kz,maxp,n,i,j: integer;
begin
i:=0;
maxp:=integer.MinValue;
writeln ('Готов к приему чисел');
repeat
i:=i+1;
readln (a[i]);
until a[i]=0;
n:=i-1;
readln (kz);
for i:=1 to n-1 do
for j:=2 to n do
if maxp<(a[i]*a[j]) then maxp:=(a[i]*a[j]);
writeln ('Получено ',n,' чисел');
writeln;
writeln ('Полученное контрольное значение: ',kz);
writeln;
writeln ('Вычисленное контрольное значение: ',maxp);
writeln;
if kz=maxp
then writeln ('Контроль пройден')
else writeln ('Контроль не пройден');
end.
--------------------------------------
Результаты:
1)
Готов к приему чисел
1 2 3 4 5 0 20
Получено 5 чисел
Полученное контрольное значение: 20
Вычисленное контрольное значение: 20
Контроль пройден
2)
Готов к приему чисел
1 2 3 4 5 6 0 20
Получено 6 чисел
Полученное контрольное значение: 20
Вычисленное контрольное значение: 30
Контроль не пройден
Думаю, что это слово:ПОДАЧА (под А ча). По другому не получается!
Если ошибаюсь пиши в нарушение,
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
44,1 КГц = 44100 Гц
5 мин = 300 секунд
2 - стерео.
8 бит
44100*300*8*2=211680000
211680000/8/=26460000 байт
26460000/1024=25839,84375 Кб (~25839,84 Кб)
25839,84375/1024=25,234222412109375 Мб (~25,23 Мб).
