1. При семибитном кодировании количество цветов в палитре составляет 2⁷ = 128 цветов.
2. Количество точек на мониторе 640×350 = 224 000. 16 цветов требует для кодирования 4 бита (16 = 2⁴), что составляет 4/8 = 0.5 байта. Тогда объем памяти составит 224 000×0.5 = 112 000 байт = 112 000/1024 = 109.375 Кбайт
3. Количество пикселей составляет 2048×1024 = 2 097 152. Тогда на 1 пиксель приходится 1.5×1024²/2 097 152 = 0.75 байта = 0.75×8 = 6 бит.
В палитре может быть максимум 2⁶ = 64 цвета.
// PascalABC.NET 3.1, сборка 1239 от 08.05.2016
begin
var k:=0;
var n:integer;
Writeln('Вводите натуральные числа; 0 - окончание ввода');
repeat
Read(n);
if (n>99) and (n<1000) and (n mod 4=0) then Inc(k)
until n=0;
Writeln(k)
end.
<h3>PascalABC.NET 3.4.2, сборка 1837 от 11.10.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var (a, b) := ReadReal2;
if a * b > 0 then Println(a - b)
else Println(a / b)
end.