pascal ABC

[Юся=)]

написать программу для решения следующей задачи: найти наименьший элемент конечной числовой последовательности, вывести его порядковый номер и значение

[Mad_Cat]

>>>>Жмакни<<<<

[Юся=)]

пока мои девичьи мозги в этом разберутся, 100 лет пройдёт)))

[VIK_aka_TOR]

тогда твоим девичьим мозгам нужно выбрать что то попроще чем программирование... без обид... за тя тут даже прогуглили... те только выбрать алгоритм... и то влом... непрошибаемые люди....

[Юся=)]

я будущий инженер-технолог, а не программист(( по этому для меня программирование это вообще лес тёмный

[VIK_aka_TOR]

в таком случае больше конкретики по поводу задания.... как вводятся значения... сколько их... и есть ли какие условия (предпочтения) в написании...

[Юся=)]

это всё задание больше ни чего не дано

[VIK_aka_TOR]

в таком случае :

uses
crt;
var
a:array[1..100] of integer;
i,n, min:integer;
begin
write('Введите количество элементов n: ');
readln(n);
for i:=1 to n do
begin
Write('a[',i,']=');
read(a[i]);
end;

min:=a[1];
for i:=2 to n do
if min > a[i] then
min:=a[i];

writeln('Минимальный элемент массива равен ', min);
end.

жмякните на весы... оставьте полодительный комент... ))

[Юся=)]

огромное спасибо))

[Юся=)]

а ещё парочку задач не решишь??