Вмассиве действительных чисел размерностью 20 есть только отрицательные и положительные элементы. вычислить произведение отрицательных элементов p1 и произведение положительных элементов p2. сравнить модуль p2 с модулем p1 и вывести наибольшее произведение.

Const n=20; 
var a:array[1..n] of real;
i:integer; p1,p2:real;
begin
writeln('Исходный массив:');
for i:=1 to n do
 begin
 a[i]:=20*random-10;
 write(a[i]:6:2);
 end;
writeln;
p1:=1; p2:=1;
for i:=1 to n do
 if a[i]>0 then p1:=p1*a[i] else p2:=p2*a[i];
if abs(p1)>abs(p2) then writeln('p1 = ',p1:5:2) else writeln('p2 =2',p2:5:2);
end.

Пример (для 10 элементов):
Исходный массив:
  2.51 -4.92 -0.31  6.88  2.54 -3.91 -0.29  5.18  3.91 -5.67
p1 = 887.53

В начале в строке находилось 333 троек по 8 плюс одна 8, всего 1000 восьмерок.
1. При выполнения цикла каждая из троек 8 будет заменена на одну 9. Значит у нас получится строка длиной в 334 символа, где 333 девятки и последний символ - восьмерка
2. Далее 333 девятки заменятся на 111 восьмерок плюс последняя восьмерка - всего получим 112 восьмерок
3. Из 112 восьмерок получится 37 девяток и одна восьмерка
4. И 37 девяток получим 12 восьмерок плюс одна девятка и плюс последняя восьмерка
5. 12 восьмерок дадут 4 девятки плюс последние 9 и 8
6. И наконец получаем строку 8998
ответ: 8998

ответ:

объяснение: чтобы стать студентом по обмену, необходимо для начала поступить в вуз на родине, в котором есть отдел международного образования. этот отдел отвечает за сотрудничество с иностранными университетами, в том числе и в вопросе обмена.

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

преимущество учебы по обмену — это возможность остаться после успешного завершения университета в другой стране, устроится на работу и получить гражданство.