Пусть количество страниц равно k. Так как в палитре 16 цветов, то каждая точка несет 4 бита информации (2^4 = 16). V = 256Кб = 262144 байт = 2097152 бит - объем видеопамяти. Пусть S - размер изображения. AxB - разрешающая способность, A * B <= S.
Тогда размер возможного изображения на экране будет вычисляться по формуле: S = V / (k * 4)
k = 1 => S = 524288 бит. Варианты разрешающей способности: 960x520; 640x480; 960x480
k = 2 => S = 262144 бит. Варианты разрешающей способности: 480x480; 320x480; 640x320
k = 4 => S = 131072 бит. Варианты разрешающей способности: 320x320; 240x320; 480x240
99 жаттығу немесе 100 жаттығу қай жаттыгу
===== PascalABC.NET =====
begin
var a := ReadArrInteger(50);
a.Pairwise.Count( p -> p[0].InRange(100, 999) and
p[1].InRange(100, 999)).Println
end.
Логические выражения все, кроме В.
ПЕР
числа: РЯД 3 ИЗ ВЕЩ;
сч: ЦЕЛ;
найдено: КЛЮЧ;
УКАЗ
найдено := ОТКЛ;
ОТ сч := 0 ДО РАЗМЕР(числа) - 1 ВЫП
ЕСЛИ числа[сч] > 1.6 И числа[сч] < 3.8 ТО
Вывод.ЧВещ("%g ", числа[сч], 0, 0, 0);
ЕСЛИ НЕ найдено ТО найдено := ВКЛ КОН
КОН
КОН;
ЕСЛИ НЕ найдено ТО
Вывод.Цепь("Ни одно число не принадлежит интервалу.")
КОН