Какой объём видеопамяти необходим для хранения изображения при условии, что разрешение монитора равно 640 x 350 пикселей, а количество используемых цветов- 16? выразить ответ в кбайт.
9 + 9 + 9 = 27, при вводе числа, больше 27 будут выведены все трёхзначные числа.
Procedure ABC(A:integer); Var i:integer; Begin For i:= 100 to 999 do if (i div 100)+((i div 10) mod 10)+(i mod 10)<=A then Write(i,' '); End; Var A:integer; Begin Write('Введите целое число: '); ReadLn(A); ABC(A) End.
9 + 9 + 9 = 27, при вводе числа, больше 27 будут выведены все трёхзначные числа.
Procedure ABC(A:integer); Var i:integer; Begin For i:= 100 to 999 do if (i div 100)+((i div 10) mod 10)+(i mod 10)<=A then Write(i,' '); End; Var A:integer; Begin Write('Введите целое число: '); ReadLn(A); ABC(A) End.
4*640*350 = 2^2 * 2^7 * 5 * 2*175 = 2^(10) * 5 * 175 (бита) =
=5*175 (Кбита) =875 : 8 (Кбайта) =169, 375 Кбайт ≈ 170 Кбайт