Может получиться так:
//Pascal ABC.NET v 3.3
var
x, s: integer;
begin
readln(x);
s := (x div 100) + (x mod 100) + (x mod 10);
writeln(s);
end.
===== PascalABC.NET =====
begin
var n := ReadInteger('Длина массива:');
var a := new BigInteger[n];
var k := BigInteger.One;
for var i := n-1 downto 0 do
begin
a[i] := k;
k *= 2
end;
a.Println
end.
Эллипс-для туловища головы глаз и можно рук и ног, прямая для треугольного носа, кисть для рта,бровей. заливка для разукрашивания
1.a) Из объектов
2.b) Растровое изображение
3. c) Увеличить растровое изображение
4. c) Теряются мелкие детали
5.b) Векторный
6. a) Точка
7. c) От яркости цветов на изображении
8.a) Количество цветов в палитре
9.b) Microsoft Paintc) Adobe Photoshop
10.b) Изменение размера происходит без потери качества
11.b) Растровое изображение
12.c) RGB модель
13.a) принтерe) дисплейf) графопостроитель (плоттер)
14.b) Corel Draw
15.b) растровой графики.
16.c) зеленый
17.a) JPEG c) GIF d) TIF e) PNG f) BMP h) PCD
18.b) 256
19.a) HSB
20.b) частота дискретизации
Сначала считаем количество пикселей 1024*768=786432
затем по формуле N=2^i находим количество бит на 1 пиксель
8=2^i ⇒ i=3, количество пикселей умножаем на глубину цвета (i)
786432*3=2359296 бит / 8 = 294912 байт / 1024 = 288 кбайт
Ответ: 288 КБайт