Паскаль! Срочно нужно!

Question

Паскаль! Срочно нужно!

Ирина Давитадзе Ученик (149), на голосовании 9 лет назад

Дан массив А длиной 10. Составить программу для нахождения минимального элемента массивы и его номера. Полученные значения выдать на экран. Массив А заполнить любым способом.

Answer 1

Александр Искусственный Интеллект (293358) 9 лет назад

к чему такая срочность?

Ирина ДавитадзеУченик (149) 9 лет назад

идёт контрольная по этому вопросу!

Answer 2

k:=1;
for i:=1 to 10 do
begin
a[i]:=random(200)-100;
write(a[i],', ');
if a[i]<a[k] then
k:=i;
end;
writeln;
writeln(k, a[k]);