Составить программу для решения следующей задачи: Создать массив А[1..7] с помощью генератора случайных чисел и вывести его на экран. Увеличить все его элементы в 2 ра-за. В ПАСКАЛЕ, ПОМОГИТЕ ПЛИИЗ
Прикрепил во вложении....
for i:=1 to n-1 do for j:=1 to n-i do if a[j]>a[j+1] then begin p:=a[j]; a[j]:=a[j+1]; a[j+1]:=p; end;
а что писать в var ?