Только жесткий диск! Для короткого хранения данных используют "Оперативную память".
Твоя программа не будет работать правильно
Вот как надо
var years, start:real;
begin
years := 0;
start := 10000;
while start < 20001 do
begin
start := start + start / 100 * 5;
years := years + 1;
end;
writeln(years:0:0, ' years');
readln();
end.
<span>4 минуты тому</span>
BF(16)=191 (10)
C1(16)=193(10)
между ними число 192 (10)= С0(16)
<span>Один пиксель кодируется 16-тью битами. 2^16 = 65536 оттенков цветов. А если это число еще умножить на Разрешение дисплея, то вы получите количество бит в видеопамяти, необходимых для хранения выводимого на экран изображения. </span>