Составить программу в паскале: из n введенных чисел найти максимальное значение среди положительных элементов.

Program abc; type      mas = array[0..1000] of integer; var      a: mas;     i, n, max: integer; begin   writeln('введите кол-во эл-тов массива: ');     readln(n);   for i : = 1 to n do   begin     writeln('введите значение элемента №', i);     readln(a[i]);   end;   writeln('все элементы массива имеют значение');   max : = -1;   for i : = 1 to n do     if a[i] > max then       max : = a[i];       if max < > -1 then         writeln('максимальное значение положительного элемент = ', max)     else writeln('положительных элементов нет');       readln; end.

Компью́терная гра́фика — область деятельности, в которой компьютеры наряду со специальным программным обеспечением используются в качестве инструмента как для создания и редактирования изображений, так и для оцифровки визуальной информации, полученной из реального мира, с целью дальнейшей её обработки и хранения.Область применения компьютерной графики не ограничивается одними художественными эффектами. Во всех отраслях науки, техники, медицины, в коммерческой и управленческой деятельности используются построенные с компьютера схемы, графики, диаграммы, предназначенные для наглядного отображения разнообразной информации. Можно рассмотреть следующие области применения компьютерной графики.

Форматирование символов - изменение значений свойств символов. К основным свойствам символов можно отнести: шрифт, размер шрифта, начертание и цвет.

Форматирование символов предусматривает:

1. Изменение типа шрифта, Times New Roman, Courier New и т.д.

2. Размер шрифта.

3. Начертание шрифта: полужирный, курсив, подчеркивание.

Форматирование абзацев предусматривает:

1. Установку ширины абзаца.

2. Установку абзацного отступа.

3. Установку выравнивания строк: по правому краю, по левому краю, по центру, по ширине.

4. Установку межстрочного интервала

Объяснение: