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

Перейти к содержимому


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


В этой теме нет ответов

#1 Валерия

    Новичок

  • Пользователи
  • Pip
  • 1 сообщений

Отправлено 28 April 2012 - 15:50

Найти максимальный элемент в одномерном массиве из заданных 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.


#2 StepPemia

    Новичок

  • Пользователи
  • Pip
  • 2 сообщений
  • ГородDuverge

Отправлено 08 March 2020 - 23:42

What Is Cephalexin 500mg Cialis Amoxil Side Effects cialis no prescription Prednislone Next Day

#3 StepPemia

    Новичок

  • Пользователи
  • Pip
  • 2 сообщений
  • ГородDuverge

Отправлено 08 March 2020 - 23:43

Cialis Pharmacie Lyon Cialis Generic Real Provera Medication Best Website Fedex cialis 5mg Buy Viagra Generic





Количество пользователей, читающих эту тему: 1

0 пользователей, 1 гостей, 0 анононимных