Почему написано на локальном диске д 154 гб свободно из 154 а уменя там есть презентации

Попытайся просто создать новую папку и перетащить туда презентации.
Если презентации тебе не нужны,то удали их просто нажав правую кнопку мыши и "удалить".

var

N: integer;

a: array [1..1000] of integer;

sum,i,k: integer;

begin

write('Введите размерность массива: ');

readln(N);

write('Введите элементы массива: ');

for i:=1 to N do

read(a[i]);

writeln('Элементы массива a: ');

for i:=1 to N do

write(a[i],' ');

writeln;

sum:=0;

for i:=1 to N do //Условие и проверка отрицательности и делимости элементов

if (a[i]<0) and (i mod 3 = 0) then

sum:=sum+sqr(a[i]);

writeln('Сумма квадратов значений элементов с условием равна: ', sum);

k:=0;

for i:=1 to N do //Условие и проверка положительности элементов

if (a[i]>0) and (a[i]<>sum) then

inc(k); //Сумма положительных элементов

writeln('Количество положительных элементов: ', k);

end.

1) В том, что у вас есть данные и вам их надо отсортировать в каком-либо порядке или критерию.

2) Когда нужно отсортировать массив по возрастанию. От меньшего к большему числу.

3) В том, что вы получаете максимум скорости, использую минимум ресурсов. Времени меньше занимает, эффективней.

4)  sorted. Ну и можно сортировать через filter, но могу ошибаться.

5) Для сортировки массива, от меньшего к большему.

6) Наибольший элемент массива ставится на своё место в конце массива рядом с предыдущим «наибольшим элементом», а наименьший элемент перемещается на одну позицию к началу массива («всплывает» до нужной позиции, как пузырёк в воде — отсюда и название алгоритма).

7) Алгоритм состоит из повторяющихся проходов по сортируемому массиву. За каждый проход элементы последовательно сравниваются попарно и, если порядок в паре неверный, выполняется обмен элементов

Объяснение: