Написать программу, которая запрашивает массив размерности n и выводит на экран сам массив, а также наибольший и наименьший элементы массива. протестировать программу на массивах размерностью 5 и 10 элементов.

Var a: array [1..100] of integer; max, min, n, i: integer; begin readln(n); for i: =1 to n do read(a[i]); for i: =1 to 10 do write(a[i],' '); max: =-maxint; min: =maxint; for i: =1 to n do begin if a[i]> max then max: =a[i]; if a[i]< min then min: =a[i]; end; writeln('наибольший элемент: ',max); writeln('наименьший элемент: ',min) end.

1) подход учитывающий не один, а несколько факторов - например   программировать работу светофора так, чтобы были учтены   а) "часы-пик"   б) погодные условия (туман/дождь/гололед) в) централизованные сигналы (проезд кортежа президента) г) сигналы пешеходов на переходе и т.д.; 2) системный эффект - это возникновение новых свойств, которых ранее не было у   элементов по отдельности. кроме того,   это не очевидное (не сразу заметное)  влияние различных факторов друг на друга и на конечный результат  - например компьютер состоит из ряда простых электронных деталей, которые сами по себе ничего не представляют, но соединённые особым образом (в структуру) позволяют   хранить   числа и программы, складывать и вычислять и в конечном итоге - моделировать реальность (в играх, например).  3) турникет в автобусе или метро (никто не знает как он работает, но все пользуются)

// pascalabc.net 3.2, сборка 1325 от 19.10.2016 begin   var s: = new stack< integer> ;   var n: integer;   writeln('вводите числа, ноль завершает ввод');   repeat       read(n);       if n< > 0 then s.push(n);   until n=0;   for var i: =1 to s.count do begin       write(s.peek,' ');       s.pop       end;   writeln end. пример вводите числа, ноль завершает ввод 3 6 9 12 5 11 -4 8 0 2 9 8 -4 11 5 12 9 6 3