<?php
echo "Исходный массив:";
$n = rand(1,13);
$S = 0;
for($i = 0; $i < $n; $i++)
{
$A[] = rand(-10,10);
$S+=$A[$i];
echo " $A[$i]";
}
echo "<br>Сумма элементов = $S<br>";
$k = -1;
for($i = $n-1; $i >= 0; $i--)
if ($A[$i] < 0) $k = $i;
if ($k == -1) echo "В массиве нет отрицательных элементов";
else echo "№ первого отрицательного: $k";
$Sr = $S/$n;
echo "<br>Sr = $Sr<br>";
$B = 0;
$C = 0;
for($i = 0; $i < $n; $i++)
{
if ($A[$i] < $Sr) $B = $i;
if ($A[$i] > $Sr) $C = $i;
}
echo "№ элемента, превышающего Sr: $C<br>";
echo "№ элемента, который меньше Sr: $B";
?>
Номер 2 правильный, кстати я тоже прямо сейчас инфознайку решаю
#include <iostream><span>using namespace std;</span><span>int main()</span>{<span> int n,a[10001],i,j,k=0,b;</span><span> cin>>n;</span><span> for(i=1;i<=n;i++)</span><span> {</span><span> cin>>a[i];</span><span> }</span><span> for(i=n;i>=1;i--)</span><span> {</span><span> cout<<a[i]<<" ";</span><span> }</span><span> return 0;</span>} <span>
</span>
<span>1)АГБ
Нарушается правило "</span>на первом месте стоит одна из бусин Б,В,Г<span>"
2)ВАА
Нарушается правило "</span>На третьем месте - одна из бусин А,В,Г, не стоящая в цепочке на первом или втором месте<span>"
3)БГВ
Нарушается правило "</span><span>На втором - одна из бусин А,Б,В</span><span>"
4)ГБА
Все правила выполнены.
Ответ: 4)ГБА</span>
Program aaa;
var
a,b,c,i,z:integer;
begin
randomize;
z:=0;
for i:=1 to 10 do begin
a:=random(9)+1;
b:=random(9)+1;
write(a,'*',b,'=');
readln(c);
if(c=a*b) then inc(z);
end;
writeln('Из 10 заданий вы выполнили ',z,' заданий!');
end.