Помогите мне пожалуйста с программой..(В паскале) Опишите процедуру поиска наибольшего и наименьшего элемента массива. С помощью этой процедуры составить программу, которая определяет совпадают ли наибольший и наименьший элеме...
Помогите мне пожалуйста с программой..(В паскале) Опишите процедуру поиска наибольшего и наименьшего элемента массива. С помощью этой процедуры составить программу, которая определяет совпадают ли наибольший и наименьший элементы двух массивов A[1..n], B[1..n].
Гость
Ответ(ы) на вопрос:
Гостьprogram gt;
var n,i,max,max2,min,min2:integer;
a,b:array[1..100]of integer;
procedure proverka(a:array[1..100]of integer;var max,min:integer);
begin
max:=a[1];min:=a[1];
for i:=1 to n do
begin
if(a[i]>max)then max:=a[i];
if(a[i]
Не нашли ответ?
Похожие вопросы