Номер 2 правильный, кстати я тоже прямо сейчас инфознайку решаю
Var x:array[1..5] of integer;
an:real;
pr,sum,i:integer;
begin;
pr:=1;
for i:=1 to 5 do
readln(x[i]);
for i:=1 to 5 do
sum:=sum+x[i];
for i:=1 to 5 do
pr:=pr*x[i];
an:=pr/sum;
writeln('Сумма:',sum);
writeln('Произведение:',pr);
writeln('Частное:',an);
<span>end.</span>
В приложении...............................................(если я правильно поняла)))
Ответ:
<em> в форме знаков и сигналов</em>
Объяснение: