Program prim;uses crt;var a,b,c:integer;beginclrscr;writeln(' ~ ');writeln(' _ _ ');writeln(' (O O)');writeln(' // V \\ ');writeln('/( _ )\ ');writeln(' ^^ ^^');
<span>end.</span>
1) Вес файла = 640 * 480 * 24 = 7372800 бит ( 8 * 3 = 24 бит)
Времени понадобится = 7372800/28800 = 256 секунд
2) x МБайт = 1024x КБайт
10ГБайт = 10 * 1024 * 1024 =
КБайт
Откуда
3) Это аналог двоичной системы счисления, где
A = 0, Б = 1.
На первом позиции стоит число со значением 0.
Значит на 7 месте будет число 7 - 1 = 6 = 110 = ББА
Var z:array[1..30]of integer;
var i:integer;
begin
randomize;
for i:=1 to 30 do begin
Z[i]:=(random(52))-2;
writeln(Z[i]);
end;
<span>end.
значения выводить можно через отдельный цикл
</span>var z:array[1..30]of integer;
var i:integer;
begin
randomize;
for i:=1 to 30 do Z[i]:=(random(52))-2;
for i:=1 to 30 do writeln(Z[i]);
end.
Переносить по одному шару синего цвета в нишу => все шары могут оказаться на другой стороне и их можно будет выкатить