Warning: Illegal string offset 'html' in /var/www/lvp37/data/www/lvp37.ru/cache/skin_cache/cacheid_2/skin_topic.php on line 379
Максимальный элемент - олимпиадники-информатики
←  Одномерные массивы

олимпиадники-информатики

»

Максимальный элемент

Валерия фотография Валерия 28 Apr 2012

Найти максимальный элемент в одномерном массиве из заданных n чисел.

Входные данные

n - количество элементов (n<=1000). Далее следуют n чисел.

Выходные данные

max-максимальный элемент.

Ввод

10

4 6 89 765 456 3 21 345 907 65

Вывод

907

Решение
​​​var a:array [1..1000] of longint;


n,i,max:longint;

begin

readln(n); //ввод n - числа элементов в массиве

for i:=1 to n do //ввод чисел массива

read(a[i]);

max:=a[1]; / / поиск максимального элемента

for i:=2 to n do if a[i]>max then max:=a[i];

writeln(max);//вывод максимального элемента

end.
Ответить

StepPemia фотография StepPemia 08 Mar 2020

What Is Cephalexin 500mg Cialis Amoxil Side Effects cialis no prescription Prednislone Next Day
Ответить

StepPemia фотография StepPemia 08 Mar 2020

Cialis Pharmacie Lyon Cialis Generic Real Provera Medication Best Website Fedex cialis 5mg Buy Viagra Generic
Ответить