Найти наименьший положительный элемент массива Е(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]0) then mix:=a[i];

end;

writeln(mix);

end.

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку