т.е. для палитры из 65536 цветов требуется 16 бит памяти
это для ОДНОЙ точки на экране
1024 x 768 = 786432 (столько всего точек/пикселей)
теперь 768432 * 16 бит = 12582912 бит (объем для хранения всего изображения)
можно перевести из бит в килобайты
12582912 / 8 / 1024 = 1536 кБайт (или 1,5 МБайт)
По часовой стрелке, начиная с верхней вершины:
17, 21, 19, 23, 15
Для трех логических переменных делаем таблицу из 8 строк:
var a, b, c, x: integer;
begin
write('Введите A: ');
readln(a);
write('Введите B: ');
readln(b);
write('Введите C: ');
readln(c);
if a > b then
x:=a
else
x:=b;
if x > c then
writeln('Наибольшее число: ', x)
else
writeln('Наибольшее число: ', c);
end.
begin
var S := ReadlnString('Вводи сплошной строкой:').ToCharArray;
SetLength(S, 50);
Println('Приняты символы:');
S.Println('');
Println('Найдено z:', S.Count(c -> c = 'z'))
end.