Зрение, слух, обоняние, осязание и тактильное восприятие.
Program n;
var
m: array[1..10] of integer;
i,k: integer;
begin
writeln('Введите массив');
k:=0;
for i:=1 to 10 do begin
readln(m[i]);
if m[i]>0 then k:=k+1;
end;
writeln(k);
<span>end.
<em>Если я помогла,то отметь мой ответ лучшим,пожалуйста</em></span>
Ответ не зависит от номера вытащенного шара. Так как вытаскивание любого из 32 шаров - равновероятное событие. Тогда получаем следующее:
N = 2^i, где N = 32, следовательно количество информации i = 5 бит
Ответ: 5 бит
Program math;var a: real;var i,n: integer;begina:=1;readln(n);for i:=1 to n dobegin a:=a+(1/i);end;writeln(a);end.