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

Написать программу которая отыщет малое значение и выведет это значение,и его номер в массиве.
A=[1,5,7,0,3,16,4,16,5,3]

Задать свой вопрос
Наталья Курчук
исходник делают на конкрэтном языке а знаиш пачиму патамушто иной языка исходник учитиль дыва паставит вотак
1 ответ
Var
a: array[0..9] of integer;
i,min:integer;
begin
for i:=1 to 9 do
read(a[i]);
min:=16;
for i:=1 to 9 do
if a[i] lt; min then min:=a[i];
writeln('Малое значение: ', min);
writeln('Номер: ', i);
end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт