var
a : array of real := (3.2,2.5,0,0.7,0,-1.3,4.3,-2.9,0,-0.4,-5.2,3.4);
n : integer;
s : real;
begin
writeln('массив a = ', a);
write('номера элементов равных 0: ');
for var i :=0 to a.Length-1 do begin
if a[i] = 0 then write(' ', i);
if a[i] > 0 then begin
n += 1;
s += a[i];
end;
end;
writeln;
writeln('s = ', s/n);
end.
Задание 1.
В ромбе всегда прописывается условие.
Задание 2.
ЕСЛИ Х ЕСЛИ Х ИНАЧЕ M := Z \\ставится условие(я), если оно не соблюдается, то число М = числу Z\\
ВСЕ \\конец\\
ИНАЧЕ \\в другом случае (ставится другое условие:)\\
ЕСЛИ Y < Z TO M := Y \\если Y < Z , то число M = Y\\
ИНАЧЕ М := Z \\в другом случае M = Z\\
ВСЕ \\конец\\
<span>ВСЕ \\конец\\
Вывод: данный фрагмент алгоритма определяет чему равно число M при определенных условиях.
Задание 3.
Не могу приложить фото с блок-схемой.
</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) векторизация растровых изображений – та же проблема со
сглаживанием. Поскольку растр имеет ступенчатую структуру (из-за пикселей),
итоговая кривая повторяет эти ступеньки, и вместо сглаженной кривой получаем «пилу».
Лечится – удалением лишних узлов и вытягиванием дуг.
Вообще на эту тему можно говорить долго, но в первом
приближении достаточно. Меня в свое время брат (дизайнер в рекламном агентстве)
насмерть отравил векторной графикой. Полезная штука. Как, впрочем, и растровая –
всякие Фотошопы и Корелпайнты.
Удачи в освоении))
IP 18. 168. 250. 32
cеть 18. 168. 240. 0
маска 255.255. XXX. 0
-------------------------------------
250= 1111 1010 (2сс)
240= 1111 0000 (2сс)
XXX=1111 0000 =240---> единственный возможный третий байт маски
ответ 1
а) Опечатка? Там просто Str, а не Str1 или Str2. В любом случае, функция возвращает длину строки, т.е. для Str1 k = 14, для Str2 k = 3
б) Возвращает 4 символа начиная с 5-го из строки Str1, s = 'su r'
в) Удаляет из Str1 4 символа начиная с 3-го, Str1 будет = 'v rodilas'
г) Вставляет Str2 в Str1 начиная с третьего сивола, Str2 не изменится, Str1 будет = 'v llesesu rodilas'
д) Возвращает позицию Str2 в Str1, n = 3
