Program test;
var
a:array[1..100] of integer;
i,n:integer;
begin
randomize;
for i:=1 to 99 do begin
n:=random(1,30);
if i mod 3 = 0 then begin
a[i]:=n;
a[i-1]:=n;
a[i-2]:=n;
end;
end;
for i:=1 to 99 do writeln(a[i]);
end.
В 8 литровом оставить 4 литра и остальные 4 разделить в 5 литровый
Число пикселей на двух страницах 2*640*800 = 1 024 000 пикселей. Поэтому объем видеопамяти = 14*1 024 000 =14 336 000 бит = 1 792 000 Байт = 1792 кБайт = 1,792 МегаБайт
2 бита потому что- 4^5=1024
(всего есть 4 вида букв, каждая из них задаётся 2 битами: 2^2=4
например:
00 - а
01 - б
10 - в
11 - г
В итоге можно задать 1024 слов из пяти двубитных букв
Вообщем поделить на 5