Требуется выяснить какое число будет выведено в результате выполнения следующей программы:
var n, s :integer;
begin
n:=0;
s:=1000;
while s>=100 do
begin
s:=s-2;
n:=n+1;
end;
write(n)
end.

Відповідь:

1

Пояснення:

while s>=100 do (s=1000)

s:=s-2;  (1000-2=998)

n:=n+1; (0+1=1)

1мб/2=512 кб на одну страницу

512*1024*8=4194304 бит на одну страницу

800*600=480 000 пискселей на одну страницу

4194304/480 000=8,74 бит на 1 пиксель, округляем в меньшую сторону по битам=8

2⁸=256 количество цветов можно использовать

1 бит на 1 символ, поэтому:

14400*10=144000 символов 

336600*10=3366000 символов