Дан одномерный массив. записать массив в обратном порядке без использования дополнительного массива. составить блок-схему и программу в паскале.

//прога на pascal`e type   myrec = record   rost : byte;   ves : byte;   end; var   mas : array of myrec;   n, i : byte;   sumves, sumrost : longint; begin write ('введите кол-во учеников: '); readln (n); setlength (mas, n);   for i: =0 to n-1 do   begin   write ('введите вес ', i+1, '-го ученика: ');   readln (mas[i].ves);   inc (sumves,  mas[i].ves);   write ('введите рост  ', i+1, '-го ученика:   ');   readln (mas[i].rost);   inc (sumrost, mas[i].rost);   end; write ('средний вес учеников: ', sumves / n, '; средний рост: ', sumrost / n) end.

Для того, чтобы открыть файл с презентацией, необходимо сперва нажать на него правой кнопкой мыши, в появившемся окне навести курсор мыши на строку "Открыть с ", далее из списка предложенных программ необходимо выбрать программу Microsoft Power Point и нажать на нее левой кнопкой мыши.

Примечание:

Если такой программы в списке нет, необходимо нажать кнопку "Другие программы" в том же окне и уже через окно поиска найти программу Microsoft Power Point. Если этой программы не окажется и в поиске, значит, она вообще не установлена на Ваш компьютер. Скачать её можно из интернета.