210*210 = 44100 пикселей
4Кб = 4*1024*8= 32768 бит
32768 / 44100 = 0,7. В итоге получаем 1 бит
// PascalABC.Net
var arr: array [1..15] of integer;
count: integer;
begin
for var i:=1 to 15 do
arr[i]:=random(1, 300);
writeln('Исходный массив: ');
for var i:=1 to 15 do
write(arr[i], ' ');
writeln();
count:=0;
for var i:=1 to 15 do
if (arr[i] > 9) and (arr[i] < 100) then
count += 1;
writeln('Количество двузначных чисел: ', count);
end.
Древние люди информации рисовали ответ в ) рисунки
Смотрите в приложении.
Всего доброго!