1 Гбайт - это два в десятой степени Мбайт. ! Мбайт - это это два в десятой степени Кбайт. Следовательно, 1 Гбайт - это два в двадцатой степени Кбайт.
Ответ: 0.5 Гбайт.
<em><u>Примечание.</u></em> Ответ получен с учетом того, что фраза из вопроса "2 в 19 степени 19 Кбайт" лишена смысла и должна пониматься, как "2 в 19 степени Кбайт".
Var x,y:integer;
begin
readln(x,y);
if (x<0) and (y>1) and (sqr(x)+sqr(y)>4) then writeln('A')
else if (x>0) and (y>1) and (sqr(x)+sqr(y)>4) and (y>x-2) then writeln('B')
else if (sqr(x)+sqr(y)<4) and (y>1) then writeln('C')
else if (x<-2) and (sqr(x)+sqr(y)>4) and (y>0) and (y<1) then writeln('D')
else if (sqr(x)+sqr(y)<4) and (x<0) and (y>0) and (y<1) then writeln('E')
else if (sqr(x)+sqr(y)<4) and (x>0) and (y>0) and (y<1) then writeln('F')
else if (sqr(x)+sqr(y)>4) and (y>0) and (y<1) and (x>2) and (y>x-2) then writeln('G')
else if (sqr(x)+sqr(y)>4) and (y>0) and (y<1) and (x>2) and (y<x-2) then writeln('H')
else if (sqr(x)+sqr(y)>4) and (x<0) and (y<0) and (y>x-2) then writeln('I')
else if (sqr(x)+sqr(y)<4) and (x<0) and (y<0) and (y>x-2) then writeln('J')
else if (sqr(x)+sqr(y)<4) and (x>0) and (y<0) and (y>x-2) then writeln('K')
else if (sqr(x)+sqr(y)<4) and (x>0) and (y<0) and (y<x-2) then writeln('L')
else if (sqr(x)+sqr(y)>4) and (x>0) and (y<0) and (y<x-2) then writeln('M')
else if (sqr(x)+sqr(y)<4) and (x<0) and (y<0) and (y<x-2) then writeln('N')
else if (y>1) and (y<x-2) then writeln ('O')
else writeln('Точка не лежит ни в одной из областей');
<span>end.</span>
10кб*8*1024=81920бит
40*64=2560 всего символов на 1 странице
81920/2560=32 страницы
Искусственные,естественные
Некоторые части алгоритма могут выделяться в виде вспомогательных алгоритмов, решающих вспомогательные подзадачи.
Для реализации вспомогательных алгоритмов служат подпрограммы или процедуры.