На вход в первой строке подаются целые положительные числа K, M и N (K ≤ N, M ≤ 10), а во второй строке — массив из N целых чисел. Вставить M элементов со значением 0 перед элементом массива с порядковым номером K (элементы нумеруются от 1). Вывести преобразованный массив в одной строке, для каждого элемента отводить 4 экранные позиции.
uses PT4Exam; const P = 100; var k, m, n, i: integer; arr: array[1..P] of integer; begin Task('ExamBegin80'); read(k, m, n); for i := 1 to n do read(arr[i]); i := n; while i >= k do begin arr[i + m] := arr[i]; arr[i] := 0; i := i - 1; end; for i := 1 to n + m do write(arr[i]:4); end.