Предмет: Информатика, автор: аоппаег

дан призвольный массив состоящий из чисел а1=5 а2=3 а3=8 а4=2 а5=10 а6=7 а7=20 а8=1 нужно написать прграмму и найти минимальное из них

Ответы

Автор ответа: dima141414
0
program Example;
var
 m : array[1..8] of integer;
 maxV,i : integer;
begin
   for i := 1 to 8 do
     begin
       readln(m[i]); // Этим циклом мы заполняем массив
     end;
j := m[1];
   for i := 2 to 8 do
      begin
        if (m[i] > m[i-1]) do j := m[i];
      end;
writeln(j);
end.
Автор ответа: аоппаег
0
СПАСИБО ОГРОМНОЕ
Похожие вопросы
Предмет: Математика, автор: elnurarapov384
Предмет: Английский язык, автор: Аноним
Предмет: История, автор: morobratCBR