Автор МиЛ@fFkA=) задал вопрос в разделе Другие языки и технологии
задача по информатике 10 класс!программирование в паскале и получил лучший ответ
Ответ от Sk-razor[гуру]
Сам учусь в 8 классе знаю пока что только как найти наименьшеее =) Делаешь с помощью операторов ifif число>число then writeln(число) и так перебирай все подряд =)
Ответ от Li-Gru[активный]
создаешь цикл с обходом масива и сравниваешь числа...
создаешь цикл с обходом масива и сравниваешь числа...
Ответ от Кукушкин Валерий[гуру]
program arrl;var a:array [1..20] of integer; min:integer; {минимальное число} minindex:integer; {его позиция}buf:integer; {для обмена значений}i:integer;begin min:=32000; randomize; for i:=1 to 20 do begin a:=ra
program arrl;var a:array [1..20] of integer; min:integer; {минимальное число} minindex:integer; {его позиция}buf:integer; {для обмена значений}i:integer;begin min:=32000; randomize; for i:=1 to 20 do begin a:=ra
Ответ от ---[гуру]
***imin:=1;min:=a [ 1 ];for i:=1 to 20 do if (a [ i ] < min) then beginimin:=i;min:= a [ i ];end;for i:=imin to 20 doa [ i ]:= a[ i+1 ] ;a [ 20 ] := min;***
***imin:=1;min:=a [ 1 ];for i:=1 to 20 do if (a [ i ] < min) then beginimin:=i;min:= a [ i ];end;for i:=imin to 20 doa [ i ]:= a[ i+1 ] ;a [ 20 ] := min;***
Ответ от Ўрик[гуру]
program example1;uses crt;const n=5;var x: array[1..n] of integer; i,vp,min,imin:integer;begin clrscr; writeln('Введите элементы массива '); for i:=1 to n do begin write('X[',i,'] = '); readln(x[ i ]); e
program example1;uses crt;const n=5;var x: array[1..n] of integer; i,vp,min,imin:integer;begin clrscr; writeln('Введите элементы массива '); for i:=1 to n do begin write('X[',i,'] = '); readln(x[ i ]); e
Ответ от Максимова Оксана[активный]
Тут есть варианты. Можно просто отсортировать этот массив (например, методом "пузырька") по убыванию. При этом наименьший элемент окажется на последнем месте.Program sort;Const N=10;Var A: Array[1..N] of real; B:real; i,j: integer;
Тут есть варианты. Можно просто отсортировать этот массив (например, методом "пузырька") по убыванию. При этом наименьший элемент окажется на последнем месте.Program sort;Const N=10;Var A: Array[1..N] of real; B:real; i,j: integer;
Ответ от 22 ответа[гуру]
Привет! Вот подборка тем с похожими вопросами и ответами на Ваш вопрос: задача по информатике 10 класс!программирование в паскале