Запишіть підпрограму-процедуру пошуку найбільшого елемента
масиву. За допомогою цієї процедури складіть програму, що
визначає, чи збігаються найбільші елементи двох масивів А [1..n] і В
[1..n].
Потрібно в паскалі. допоможіть
Ответы
Ответ дал:
1
Ответ:
procedure findLargest(arr: array of Integer; n: Integer; var largest: Integer);
begin
largest := arr[0];
for i := 1 to n-1 do
begin
if (arr[i] > largest) then
largest := arr[i];
end;
end;
Вас заинтересует
4 месяца назад
5 месяцев назад
2 года назад
2 года назад
7 лет назад