Ничего не вижу , кроме 17
17.ЕГАДВЖБ
1) Вес файла = 640 * 480 * 24 = 7372800 бит ( 8 * 3 = 24 бит)
Времени понадобится = 7372800/28800 = 256 секунд
2) x МБайт = 1024x КБайт
10ГБайт = 10 * 1024 * 1024 =
![10 * 2^{20}](https://tex.z-dn.net/?f=10+%2A++2%5E%7B20%7D++)
КБайт
![1024x - 10 * 2^{20} = 10 ](https://tex.z-dn.net/?f=1024x+-+10+%2A++2%5E%7B20%7D++%3D+10%0A)
Откуда
![x = \frac{10 + 10 * 2^{20} }{ 2^{10}}](https://tex.z-dn.net/?f=x+%3D++%5Cfrac%7B10+%2B+10+%2A++2%5E%7B20%7D+%7D%7B+2%5E%7B10%7D%7D++)
3) Это аналог двоичной системы счисления, где
A = 0, Б = 1.
На первом позиции стоит число со значением 0.
Значит на 7 месте будет число 7 - 1 = 6 = 110 = ББА
Uses crt;
const N=20;
var
i,A,x: integer;
arr: array [1..N] of integer;
begin
clrscr;
x:=0;
write ('A=');
readln (A);
writeln ('Array: ');f
or i:=1 to N do
begin
arr[i]:=random(41)-20;
write (arr[i],' ');
end;
for i:=1 to N do
begin
if (arr[i]>=0) and (arr[i]<=A) then
x:=x+1;
end;
writeln ();
writeln ('Answer: ',x);
readln ();
<span>end.</span>
Я в С++ и С# не силён, ну а если бы я делал это на паскаль то это бы было так
Там с переменными в конце проблема