Дан массив из 30 чисел, найти количество минимумов
Дан массив из 30 чисел, найти количество минимумов
Гость
Ответ(ы) на вопрос:
Гостьvar
mas:array[1..30] of integer;
min,i,count:integer;
begin
min:=maxint;
randomize;
for i:=1 to 30 do
begin
mas[i]:=random(100);
if (mas[i]
Гостьvar
mas:array[1..30] of integer;
min,i,count:integer;
begin
min:=maxint;
randomize;
for i:=1 to 30 do
begin
mas[i]:=random(100);
if (mas[i]
Не нашли ответ?
Похожие вопросы