Можно фаст решить даю хороший ответ Что будет выведено на экран в результате выполнения фрагмента алгоритма: X1:=3; X2:=5; readln(X1); writeln(X1+X2); Если при работе фрагмента с клавиатуры было введено число 10?

Тебе с объяснением или только ответ?

Объяснение:

1.  Укажите программу для работы с растровыми изображениями.

B. Paint.

2. В файле какого формата хранятся растровые изображения?

А. BMP.

3. В каком формате применяется сжатие?

А. JPG.

4. Формат графического файлы – это:

представления и расположения графических данных на внешнем носителе.

5. Выберите графический формат, в котором могут храниться анимированные изображения.

А. GIF.

Точно не уверенна, но думаю так

Редактор векторной графики Inkscape.

1.  Укажите стандартный формат файлов в редакторе Inkscape.

А. Inkscape SVG.

2. Для точной настройки инструментов служит:

B. Панель параметров инструментов.

3. Просмотреть список выполненных действий можно, выполнив команду:

C. Правка→История действий.

4. Какая команда меню открывает диалог «Заливка и обводка»?

C. Объект→ Заливка и обводка.

5. Какую клавишу необходимо удержать нажатой при выборе цвета обводки из Палитры?

C. Shift.

{PascalABC}

Program Begenjov1997;

const

 n = 30; {Количество элементов массива}

 m = 10000; {Максимально возможное значение элемента}

var

 a:array[1..n] of integer;

 i, sum: integer;

 s:string;

begin

 s:=' -=Alphaeus=- ';

 for i:=1 to 22 do begin write(s[i]); sleep(60) end;

{заполняем массив случайными числами}

 writeln; randomize;

 for i:=1 to n do

   begin

     a[i]:=random(m+1);

   end;

{Ищем максимальную сумму двух соседних элементов}

 sum:=a[1]+a[2];

 for i:=2 to n-1 do

     if (a[i]+a[i+1]>sum) then sum:=a[i]+a[i+1];

{Заменяем элементы, кратные 3, наденной суммой}

 for i:=1 to n do

     if (a[i] mod 3 = 0) then  a[i]:=sum;

{Вывод}

 writeln('Массив А в обратном порядке:');

 for i:=0 to n-1 do writeln(a[n-i],'  ');

 writeln();

 writeln('Максимальная сумма двух соседних элементов равна ',sum);

end.