Завести в программе массив Dot{любые 8 целых чисел от 1 до 100}. Найти минимальный...

Question

Завести в программе массив Dot{любые 8 целых чисел от 1 до 100}. Найти минимальный элемент массива и его номер и вывести его на экран.

Comments

а на каком языке программирования?

Answer 1

Паскаль
var dot: array [1..8] of integer;
             i,max,maxi:integer;
begin
max:=0;
for i:=1 to 9 do // создание массива
readln(a[i]); 
for i:=1 to 9 do
if maxbegin 
max:=a[i];
maxi:=i;
end;
writeln(max," ",maxi);
end;