1мб=1048576 байтов
1048576:4=262144 байт
var
N, count:integer;
begin
write('N = ');
readln(N);
count := 0;
while N > 0 do
begin
if (N mod 10) mod 3 = 0 then
count := count + 1;
N := N div 10;
end;
writeln('Count = ', count);
readln;
end.
Решение показано в прилагаемом файле.
Ответ: 77
1. C)
2. a = 10
b = a * 2 + 3
b = 23
a = 2
b = 33
Ответ : D)
3. Сори не проходил еще (p.s 7 класс)
4. D)
5. D)
6. Сори, этот тоже не проходил
11КГц=11000гц
1 мин=60 секунд
11000*8*60=5280000/4=1320000 байт/1024=1289,0625 кб/1024=1мб
Вроде так)