В языке за некой поисковой машины для обозначения
логической операции ИЛИ используется символ «|», а для логической
операции И — символ «&». Известны за и количество найденных по
ним страниц некоторого сегмента сети Интернет:
За Найдено страниц:
Информатика & Математика & Физика:12
Информатика & Математика; 26
Информатика & Физика; 34
Сколько страниц (в миллионах) будет найдено по за Информатика & (Математика| Физика)

К устройствам ввода графической информации относится
мышь

2. К устройствам вывода графической информации относится
монитор

3. Наименьшим элементом изображения на графическом экране является:
пиксель

4. Пространственное разрешение монитора определяется как:
произведение количества строк изображения на количество точек в строке

5. Цвет пикселя на экране монитора формируется из следующих базовых цветов
красного, синего, зелёного

6. Глубина цвета - это количество:
битов, которые используются для кодирования цвета одного пикселя

7. Видеопамять предназначена для:
хранения информации о цвете каждого пикселя экрана монитора

8. Графическим объектом не является
текст письма

9. Графический редактор - это:
программа для создания и редактирования рисунков

10. Достоинство растрового изображения:
точность цветопередачи

11.Векторные изображения строятся из:
графических примитивов

12.Растровым графическим редактором не является:
CorelDraw

Заполнение с клавиатуры:

Var
   A:array[1..5] of integer;
   i,O,P:integer;
Begin
Write('Введите массив A(5): ');
O:=0;
P:=0;
For i:= 1 to 5 do
    Begin
    Read(A[i]);
    if A[i] < 0 then O:=O+1
    else if A[i] > 0 then P:=P+1;
    End;
WriteLn('Количество отрицательных: ',O);
WriteLn('Количество положительных: ',P);
End.

Заполнение случайными числами:

Const
   N = 5;
Var
   A:array[1..N] of integer;
   i,O,P:integer;
Begin
Randomize;
Write('Введите массив A(5):');
O:=0;
P:=0;
For i:= 1 to N do
    Begin
    A[i]:=random(2*N+1)-N;
    Write(' ',A[i]);
    if A[i] < 0 then O:=O+1
    else if A[i] > 0 then P:=P+1;
    End;
WriteLn;
WriteLn('Количество отрицательных: ',O);
WriteLn('Количество положительных: ',P);
End.