Хелп! сформулировать точное условие задачи:program ex_4; var i, n: byte; k: integer; a: array[1..120] of integer; begin . ' randomize; write('сколько элементов в массиве? '); readln(n); write('введите заданное число k: '); readln(k); for i := 1 to n do begin a[i] := -100 + random(201); write(a[i] : 6) end; writeln; for i := n downto 1 do begin a[2 * i]:= k; a[2 * i - 1]:= a[i] end; writeln('ответ:'); for i:= 1 to 2 * n do write(a[i]:6); writeln end.​

Обычно виртуальный принтер используется для:

Преобразование документов в формат PDF, Djvu или PostScript.Сохранение нескольких документов в один.Преобразование документов в графические файлы, например, в JPEG или TIFF, для представления в универсальном, платформо-независимом формате.Отправка документов на сервер факсимильных сообщений.Добавление возможностей, которые не поддерживает принтер, таких как:печать нескольких страниц на одной без бордюров;печать на бланках;водяные знаки, и другое.Удалённая печать документов через Интернет.

//PascalABC.NET (версия 3.1, сборка 1198 от 11.03.2016)
var a,n,k,i,j,s:integer;
begin
  writeln('Количество учеников и количество оценок');
  readln(n,k);
  for i:=1 to n do begin
    for j:=1 to k do begin
      write('Ученик № ',i, ' оценка № ',j,' = ');
      readln(a);
      s:=s+a;
    end;
  end;
  println('Средняя оценка группы ',s/(n*k):6:3);
end.

Тестовое решение:
Количество учеников и количество оценок
3 3
Ученик № 1 оценка № 1 = 3
Ученик № 1 оценка № 2 = 4
Ученик № 1 оценка № 3 = 4
Ученик № 2 оценка № 1 = 5
Ученик № 2 оценка № 2 = 4
Ученик № 2 оценка № 3 = 4
Ученик № 3 оценка № 1 = 4
Ученик № 3 оценка № 2 = 3
Ученик № 3 оценка № 3 = 3
Средняя оценка группы  3.778