LockeD [Off] [#] (07.02.2012 / 20:52) ████████████ - сотри и прочитай мой статус

вопщем двор дедушки одной стороной, длинна которой 100м, выходит к лесу. Дедушка решил отгородить свой двор от леса, но не сплошной оградой, а только отдельными столбиками. Он установил первый столбик на краю границы и поручил своим внукам, возвращаясь с прогулки в лесу, приносить деревянные столбики и добавлять их к ограде - кто куда захочет. Так со временем и начала появлятся ограда.
Создать программу нахождения наибольшего расстояния между столбиками:
Входящие данные: k - целое число от 1 до 5000 (колличество столбиков установленных внуками), вводится с клавиатуры или задается как константа;
Значение Ri (i = 1, 2, ..., К) - целые числа от 10 до 10000 (значения расстояний (в САНТИМЕТРАХ) от столбика деда до столбиков внуков в порядке их установления), вводятся с клавиатуры или из файла.
Вывести на экран нужно Rmax (максимальное расстояние между столбиками в САНТИМЕТРАХ).

Monk [Off] [#] (08.02.2012 / 09:07)

ой бля пиздец! запутано как-то... Лень думать. Гг.

Monk [Off] [#] (08.02.2012 / 09:15)

вот мне не понятно. кто куда хочет - это по порядку от первого столба или ваще без какого либо порядка?

Monk [Off] [#] (08.02.2012 / 11:42)

вот. это если числа Ri идут по возростанию. то есть если столпы ставили один за одним после главного, если их ставили хаотично, то придется написать блок который сортирует значения Ri
program LockeD;
var k, i, Rmax: integer;
R, R2: array [0..5000] of integer;
begin

repeat
begin
write ('k = ');
readln(k);
end;
until 5000 >= k;

R[0]:=0;

for i:=1 to k do
begin
repeat
begin
write('R[',i,'] = ');
readln(R[i]);
end;
until (10000 >= R[i])and (R[i]>= 10) and (R[i] > R[i-1]);
end;

for i:=k downto 2 do
begin
R2[i]:= R[i]-R[i-1];
end;
Rmax:=R[1];

for i:=2 to k do
begin
if R2[i] > Rmax then
Rmax:= R2[i];
end;
writeln('Rmax = ', Rmax);
end.

LockeD [Off] [#] (08.02.2012 / 13:54) ████████████ - сотри и прочитай мой статус

Monk (08.02.2012/09:15)
вот мне не понятно. кто куда хочет - это по порядку от первого столба или ваще без какого либо порядка?отсчет идет от дедкшкиного столба, Ri - расстояние от дедушкиного столба до поставленого

LockeD [Off] [#] (08.02.2012 / 14:42) ████████████ - сотри и прочитай мой статус

при к=3
R: 100, 70, 15
Что получает твоя прога?

Monk [Off] [#] (08.02.2012 / 15:42)

LockeD (08.02.2012/14:42)
при к=3
R: 100, 70, 15
Что получает твоя прога?Rmax = 55
но порядок вода таков:
15, 70, 100

LockeD [Off] [#] (08.02.2012 / 18:03) ████████████ - сотри и прочитай мой статус

Monk (08.02.2012/15:42)
Rmax = 55
но порядок вода таков:
15, 70, 100ответ правильный, но порядок в файле именно такой.
При k=1, r - 20 получаеш 20?

Monk [Off] [#] (08.02.2012 / 21:21)

LockeD (08.02.2012/18:03)
ответ правильный, но порядок в файле именно такой.
При k=1, r - 20 получаеш 20?ну порядок можна легко поменять)
ответ 20. ты бы сам тестил. Ты для чего задачу сюда писал? узнать решение, или нас проверить?