Исходник программы паскаль, задача которого заключается в следующем: вставить произвольный элемент в одномерный целочисленный массив. Исходник имеет пояснительные комментарии к некоторым строкам. Открыть можно с помощью программ Pascal ABC.Net, Pascal ABC, TurboPascal и других компиляторов. Скачать исходник, а также просмотреть исходный код, Вы можете далее.
Исходный код программы:
Const n = 6;
Var
arr: array[1..n] of integer;
i, j, b, a: integer;
Begin
writeln('Заполните массив: '); //Заполнение массива
for i := 1 to n - 1 do
readln(arr[i]);
write('Ваш массив: ');
for i := 1 to n - 1 do
write(arr[i]:5);
writeln;
write('Укажите еще один элемент: '); //Вставка элемента
readln(b);
write('Позиция в массиве: ');
readln(a);
for i := n - 1 downto a + 1 do
arr[i+1] := arr[i];
arr[a] := b;
write(' Ваш массив: '); //Вывод массива
for i := 1 to n do
write(arr[i]:5);
writeln;
readln
End.Если Вы не понимаете код данной программы, то Вам нужно изучать паскаль с нуля. Уроки по программированию на Pascal размещены в категории "Уроки Паскаль". Про одномерные массивы написано тут. Узнать, что такое raid массив можно тут - raid 10. А про то, что такое двумерный массив можно из урока № 11.
Скачать исходник: vstavka.pas