Var a: array[1..100] of integer;
<span> i,n,bg,nd,s: integer;
</span><span>begin
</span><span> write('n = '); readln(n);
</span><span> randomize;
</span><span> bg:=0; nd:=0;
</span><span> for i:=1 to n do
</span><span> begin
</span><span> a[i]:=random(10);
</span><span> write(a[i],' ');
</span><span> if a[i]=0 then
</span><span> if (bg>0) and (nd=0) then nd:=i
</span><span> else if bg=0 then bg:=i;
</span><span> end;
</span><span> writeln;
</span><span> if bg+nd>1 then
</span><span> begin
</span><span> if (bg mod 2=0) then inc(bg)
</span><span> else bg:=bg+2;
</span><span> if (nd mod 2=0) then dec(nd)
</span><span> else nd:=nd-2;
</span><span> writeln('начало: ',bg,' конец: ',nd);
</span><span> s:=1;
</span><span> repeat
</span><span> s:=s*a[bg];
</span><span> bg:=bg+2;
</span><span> until bg>nd;
</span><span> writeln('произведение: ',s);
</span><span> end
</span><span> else writeln(0);
</span><span>end.
</span>
n = 15
<span>4 4 7 0 3 5 6 1 1 8 8 4 0 1 9
</span><span>начало: 5 конец: 11
</span><span>произведение: 144
</span>
Особенностью векторной графики является то, что кривые, составляющие изображение, очень точно описываются математически и с учетом возможности задания толщины линий представляют собой качественный чертеж (рисунок). При этом, в отличие от растровой графики, качество изображение не меняется при масштабировании.
Основные пакеты для работы с векторной графикой - CorelDraw, Adobe Illustrator, Мacromedia FreeHand, AutoCad, Mapinfo. Первые 3 пакеты больше находят применение в дизайне и полиграфии, AutoCad - промышленное проектирование и черчение, Mapinfo - ГИС (<span>географическая информационная система - используется при обработке пространственных данных).
Поэтому проблема повышения качества как таковая для векторной графики не стоит, за исключением случаев:
</span>- импорт/экспорт между различными пакетами
- векторизация растровых изображений
– перевод сканированных
изображений в вектор
- совместное использование в одном рисунке растровых и
векторных изображений (но это уже пограничные моменты. Здесь качество всего
рисунка определяется его растровой составляющей).
<span>
1) импорт/экспорт между различными пакетами. Проблема очень
остро возникает в случае обмена фрагментами изображений ( или импортом всего
файла) между CorelDraw, с одной стороны и Adobe Illustrator и Мacromedia
FreeHand, с другой. Проблема в том, что для описания вектора в них используется
различный математический аппарат. В CorelDraw – это кривые Безье, и вид вектора
определяется конкретной функцией для описания узлов, и касательные к дугам у Adobe
Illustrator и Мacromedia FreeHand. Поэтому при импорте кривая бьется на
сегменты и теряет сглаженность. Обмен между этими пакетами крайне негативно
влияет на качество и категорически не рекомендуется. Также не рекомендуется
активно использовать градиентные заливки, если планируется последующий импорт.
Можно порекомендовать использование обменных форматов EPS (encalulated PostScript) и PDF. Но это уже практически без
возможности последующего редактирования после импорта.</span>
2) векторизация растровых изображений – та же проблема со
сглаживанием. Поскольку растр имеет ступенчатую структуру (из-за пикселей),
итоговая кривая повторяет эти ступеньки, и вместо сглаженной кривой получаем «пилу».
Лечится – удалением лишних узлов и вытягиванием дуг.
Вообще на эту тему можно говорить долго, но в первом
приближении достаточно. Меня в свое время брат (дизайнер в рекламном агентстве)
насмерть отравил векторной графикой. Полезная штука. Как, впрочем, и растровая –
всякие Фотошопы и Корелпайнты.
Удачи в освоении))
Обожаю Python.
n = 0
for i in range(4):
n *= 10**len(str(2**100))
n += 2**100
print(n)
print(n**(1/10))
