Ответ:
Объяснение:
1) 6 бит
2)По формуле N=2^i найдем, сколько было круглых фигурок - 2^2 = 4; Всего фигурок было 15+4=19. Ответ: 19
3) я не знаю
4)Обозначим количество красных кубиков через x, тогда желтых будет 2x, а зеленых (2x + 6). Всего кубиков (5x + 6). Раз желтый кубик дает 2 бита, по формуле Шеннона желтые кубики составляют долю 2 в (-2) степени, т. е. 1/4 от всех кубиков. Значит всего кубиков 8x. Приравниваем 5x + 6 = 8x. Отсюда x = 2, т. е. зеленых кубиков 2x + 6 = 10.
Итак, всего 10 зеленых кубиков.
program noname;
uses crt;
var
a:array[1..100] of integer;
i,n,k:byte;
begin
clrscr;
for i:=1 to 20 do begin
randomize;
a[i]:=random(100)-50;;
write(a[i],' ');
if (a[i] mod 2=0) and (a[i]<>0) then k:=i;
end;
n:=0;
for i:=1 to k do
if a[i]<0 then n:=n+1;
writeln;
writeln(k,'-номер последнего четного');
writeln(n,'-число отрицательных элементов до ', a[k])
end.