Найти длину наименьшего отрезка числовой оси, содержащего все элементы последовательности

@uralic · Регистрация: 25.02.2016

Author24 — интернет-сервис помощи студентам

Даны натуральное число n, действительные числа x1, x2, …, xn. Найти длину наименьшего отрезка числовой оси, содержащего все числа x1, x2, …, xn. ( в паскале)

@Puporev · 16.12.2016, 20:51

Вводите числа, в процессе ввода найдите минимальное и максимальное значения.

Pascal

1	d:=max-min;

@uralic · 16.12.2016, 22:42 **[ТС]**

Не могли бы полностью программу написать, если не трудно.

@Puporev · 17.12.2016, 07:36

Pascal

var n,i,x,mn,mx:integer;
begin
repeat
write('Количество чисел n>1 n=');
readln(n);
until n>1;
writeln('Введите ',n,' целых чисел');
readln(x);
mn:=x;
mx:=x;
for i:=2 to n do
 begin
  readln(x);
  if x<mn then mn:=x
  else if x>mx then mx:=x;
 end;
write('Длина отрезка=',mx-mn);
end.

@uralic · 17.12.2016, 19:49 **[ТС]**

Спасибо огромное!!!!
а можешь помочь еще с такие задачами:
Тексты заданий удалены.

@Puporev · 17.12.2016, 19:53

Создайте для каждого задания свою тему.

@ComandanteZ · 20.06.2021, 08:32

Program1.pas(8) : Ошибка времени выполнения: Входная строка имела неверный формат.

@JuriiMW · 20.06.2021, 08:51

Всё прекрасно работает.
ComandanteZ, это вы не умеете пользоваться паскалем!

@ComandanteZ · 20.06.2021, 09:16

Может скриншот выполненной работы компилятора?

@JuriiMW · 20.06.2021, 09:25

Легко!

@Puporev · 20.06.2021, 09:26

Сообщение от ComandanteZ

Program1.pas(8) : Ошибка времени выполнения: Входная строка имела неверный формат.

Нужно вводить целые числа.

@ComandanteZ · 20.06.2021, 09:32

Я хз.

@ComandanteZ · 20.06.2021, 10:09

Могу попросить Вас - развернутое окно вывода прислать? Если не сложно.

Добавлено через 17 минут
Я всё понял. Был не прав).
Всё работает

@Puporev Почетный модератор 64300 / 47595 / 32743 Регистрация: 18.05.2008 Сообщений: 115,181
	20.06.2021, 09:26	11
	Сообщение от ComandanteZ Program1.pas(8) : Ошибка времени выполнения: Входная строка имела неверный формат. Нужно вводить целые числа. 0

@ComandanteZ 0 / 0 / 0 Регистрация: 20.06.2021 Сообщений: 4
	20.06.2021, 10:09	13
	Могу попросить Вас - развернутое окно вывода прислать? Если не сложно. Добавлено через 17 минут Я всё понял. Был не прав). Всё работает 0

@uralic 1 / 1 / 0 Регистрация: 25.02.2016 Сообщений: 15
		1
	Найти длину наименьшего отрезка числовой оси, содержащего все элементы последовательности 16.12.2016, 19:08. Показов 4209. Ответов 12 Метки нет (Все метки) Даны натуральное число n, действительные числа x1, x2, …, xn. Найти длину наименьшего отрезка числовой оси, содержащего все числа x1, x2, …, xn. ( в паскале) 1

@uralic 1 / 1 / 0 Регистрация: 25.02.2016 Сообщений: 15
	16.12.2016, 22:42 [ТС]	3
	Не могли бы полностью программу написать, если не трудно. 0

@uralic 1 / 1 / 0 Регистрация: 25.02.2016 Сообщений: 15
	17.12.2016, 19:49 [ТС]	5
	Спасибо огромное!!!! а можешь помочь еще с такие задачами: Тексты заданий удалены. 0

@Puporev Почетный модератор 64300 / 47595 / 32743 Регистрация: 18.05.2008 Сообщений: 115,181
	17.12.2016, 19:53	6
	Создайте для каждого задания свою тему. 0

@ComandanteZ 0 / 0 / 0 Регистрация: 20.06.2021 Сообщений: 4
	20.06.2021, 08:32	7
	Program1.pas(8) : Ошибка времени выполнения: Входная строка имела неверный формат. 0

@JuriiMW 5077 / 2649 / 2349 Регистрация: 10.12.2014 Сообщений: 10,027
	20.06.2021, 08:51	8
	Всё прекрасно работает. ComandanteZ, это вы не умеете пользоваться паскалем! 0

@ComandanteZ 0 / 0 / 0 Регистрация: 20.06.2021 Сообщений: 4
	20.06.2021, 09:16	9
	Может скриншот выполненной работы компилятора? 0

@JuriiMW 5077 / 2649 / 2349 Регистрация: 10.12.2014 Сообщений: 10,027
	20.06.2021, 09:25	10
	Легко! Миниатюры 0

@ComandanteZ 0 / 0 / 0 Регистрация: 20.06.2021 Сообщений: 4
	20.06.2021, 09:32	12
	Я хз. Миниатюры 0