Question

Дан массив из десяти целых чисел. Определите, сколько элементов этого массива имеют минимальное значение!!!(именно минимальное)

Answer 1

судя по логике только 1-минимальный,уточни задание

Answer 2

program zadacha;
vara: array[1..10] of integer;i,max,n: integer;
beginfor i:=1 to 10 do read(a[i]);n:=0;max:=a[1];
for i:=2 to 10 do beginif maxfor i:=1 to 10 do beginif a[i]=max then beginn:=n+1;end;end;
writeln();writeln('max=',max);writeln('n=',n);end.

Понимаю как максимальное,а как минимальное нееет((((

Answer 3

так же,только знак другой,меньше

Answer 4

ar i,min: Integer;
mas:array[1..10] of Integer ;
begin
min:=mas[1];
Randomize();
for i:=1 to 10 do
begin
mas[i]:=Random(20);
write(' ',mas[i]);
if(mas[i]end;
WriteLn();
writeln('minimal ',min);
end.

Answer 5

vot

Answer 6

Спасибо))