Var
salary, payment, percent, max, balance, profit, gain: real;
i: integer;
begin
write('Z = ');
read(salary);
write('K = ');
read(payment);
write('P = ');
read(percent);
write('A = ');
read(max);
balance := 0;
gain := 0;
for i := 1 to 12 do
begin
balance := balance + salary - payment;
profit := balance * percent / 100;
balance := balance + profit;
gain := gain + profit;
if gain > max then break;
end;
writeln(gain);
end.
Формула V= количество точек по вертикали*количество точек по горизонтали*битовую глубину цвета
Для 65536 битовая глубина =16 т.к 2 в 16 степени=65536
V=h*w*b=512*768*16=6291456 бит =786432 байта =768 Килобайт
Я считаю, что это могут быть колокола
Палитра 512 цветов=2**9=>глубина цвета 9 бит.
36Кб=36*8*1024=294912 бит
Объем изображения=Размер изображения *на глубину цвета=>294912=256*a*9=>a=128
Ряд слов, букв написанных в одну линию