Решение задачи на Паскаль - Сдвиг элементов одномерного массива влево. Используется цикл c параметром FOR. Есть пояснительные комментарии. Открывается программами Pascal ABC.Net, Pascal ABC и другими. Скачать исходник или просмотреть исходный код программы, Вы можете ниже.
Исходный код программы:
const N = 10; //Описание констант
var a: array [1..N] of integer; //Описание переменных
begin //Начало программы
for var i:=1 to N do //Описание массива и вывод его
a[i] := Random(100);
writeln('Элементы массива: ');
for var i:=1 to N do
write(a[i],' ');
writeln;
for var i:=1 to N-1 do //Сдвиг эл-ов массива
a[i] := a[i+1];
a[N] := 0;
writeln('После сдвига влево: ');//Вывод массива
for var i:=1 to N do
write(a[i],' ');
writeln;
end. //Конец программы
Скачать исходник: sdvig.pas