Найти наименьший положительный элемент массива Е(9) и его номер. составить алгоритм двумя способами(блок-схема и программа). Решите пожалуйста.
var a:array [1..100] of integer;
i,min:integer;
begin
min:=maxint;
for i:=1 to 100 do
begin
readln(a[i]);
if (a[i]
end;
writeln(mix);
end.
Оцени ответ
