Дается последовательность из N чисел. Выведите разницу между максимальным и минимальным элементами последовательности.

Формат входных данных

Первая строка входного файла содержит целое число N (1 < = N < = 100000). В следующей строке задаются N положительных целых чисел, каждое из которых не превышает 100000.

Формат выходных данных

Выведите ответ к задаче.

Question

Информатика

Моня

21 октября, 15:39

Дается последовательность из N чисел. Выведите разницу между максимальным и минимальным элементами последовательности.

Формат входных данных

Первая строка входного файла содержит целое число N (1 < = N < = 100000). В следующей строке задаются N положительных целых чисел, каждое из которых не превышает 100000.

Формат выходных данных

Выведите ответ к задаче.

+4

Ответы (1)

Авдей · Answer 1

Const n=4; { любое число N от 1 до 100000} var a:array [1 ... n] of integer; b, min, max, s:integer; proizvedenie:real; beginwriteln ('Введите n чисел') ; for b:=1 to n do read (a[b]) ; for b:=1 to n do write (a[b],' ') ; min:=a[1]; max:=0; for b:=1 to n do begin if a[b]>max then max:=a[b]; if a[b]Комментировать