Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 19.09.2011, 22:36   #1
daniil123
Пользователь
 
Регистрация: 19.09.2011
Сообщений: 23
По умолчанию Найти минимальное расстояние до бортика бассейна

Помогите решить задачу:

Яша плавал в бассейне размером N  M метров и устал. В этот момент он обнаружил, что находится на расстоянии x метров от одного из длинных бортиков (не обязательно от ближайшего) и y метров от одного из коротких бортиков. Какое минимальное расстояние должен проплыть Яша , чтобы выбраться из бассейна на бортик?

На вход программе подаются 4 натуральных числа: N , M , x , y ( N ≠ M ), разделенные пробелами. Все числа не превосходят 100. Требуется вывести одно число — минимальное расстояние, которое должен проплыть Яша , чтобы выбраться на бортик.

Пример входных данных

10 25 7 8

Пример выходных данных

3
daniil123 вне форума Ответить с цитированием
Старый 19.09.2011, 22:52   #2
VadikV
Форумчанин
 
Аватар для VadikV
 
Регистрация: 08.01.2011
Сообщений: 226
По умолчанию

и что тут сложного????
обычными if и знанием расстояний (даются в условии) все делается элементарно.
icq 223-630-454
e-mail vysotskiy@list.ru
сайт http://www.big-library.net/
VadikV вне форума Ответить с цитированием
Старый 19.09.2011, 22:54   #3
Alex11223
Старожил
 
Аватар для Alex11223
 
Регистрация: 12.01.2011
Сообщений: 19,500
По умолчанию

А зачем тут N и M? Чтоб внимание отвлечь?) Вроде же просто надо сравнить, что ближе: х или у?
Ушел с форума, https://www.programmersforum.rocks, alex.pantec@gmail.com, https://github.com/AlexP11223
ЛС отключены Аларом.
Alex11223 вне форума Ответить с цитированием
Старый 20.09.2011, 00:42   #4
Dvoishnik
Форумчанин
 
Регистрация: 12.02.2011
Сообщений: 808
По умолчанию

Цитата:
Сообщение от Alex11223 Посмотреть сообщение
А зачем тут N и M? Чтоб внимание отвлечь?) Вроде же просто надо сравнить, что ближе: х или у?
забываете 5 класc математики)

Код:

program dff;
uses crt;
var 
n,
m:integer;
x,
y:byte;

begin
clrscr;
writeln('введите длинну бортика N');
readln(n);
writeln('введите длинну бортика M');
readln(m);
if m=n then 
 writeln('Ошибка ввода')
 else
 begin
 writeln('введите растояние от короткого бортика');
 readln(x);
 if m>n then 
  begin
  n:=n-x;
  if n<0 then 
   begin
   writeln('Ошибка вводарастояния до одного из коротких бортиков'); 
   readln;  
   halt;
   end;
  writeln('введите растояние от длинного бортика');
  readln(y);
   begin
  m:=m-y;
  if m<0 then 
   begin
   writeln('Ошибка ввода растояния до одного из коротких бортиков'); 
   readln;
   halt;
   end;
  end
 else
  begin
  m:=m-x;
  if m<0 then 
   begin
   writeln('Ошибка ввода растояния до одного из коротких бортиков'); 
   readln;
   halt;
   end;
  writeln('введите растояние от длинного бортика');
  readln(y);
  n:=n-y;
  if n<0 then 
   begin
   writeln('Ошибка ввода растояния до одного из длинных бортиков'); 
   readln;  
   halt;
   end;
  end;
 end;
if (n<m) and (n<y) and (n<x) then 
writeln(n,'самое маленькое растояние') 
 else 
  if (m<y) and (m<x) then 
 writeln(m,'самое маленькое растояние')
   else
    if (x<y) then 
   writeln(x,'самое маленькое растояние')
     else
      writeln(y,'самое маленькое растояние');
readln; 
end.
прошу прощения за возможные ошибки очень давно на паскале не писал.
Терпение!Дежурный экстрасенс скоро свяжется с вами!

Последний раз редактировалось Dvoishnik; 20.09.2011 в 00:44.
Dvoishnik вне форума Ответить с цитированием
Старый 20.09.2011, 10:18   #5
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,229
По умолчанию

Цитата:
А зачем тут N и M? Чтоб внимание отвлечь?) Вроде же просто надо сравнить, что ближе: х или у?
нет. в условии же сказано:
Цитата:
на расстоянии x метров от одного из длинных бортиков (не обязательно от ближайшего)
посмотрите, на данный пример решения, x и y равны 7 и 8 м., а кратчайшее расстояние до борта - 3 м.
Serge_Bliznykov вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Найти минимальное кол-во ячеек caracas Microsoft Office Excel 4 02.05.2011 13:56
СИ Найти наименьшее расстояние между точками savra Помощь студентам 2 19.04.2011 10:16
Найти минимальное множество прямых Inokentiy Помощь студентам 12 11.05.2010 18:00
Найти из N чисел минимальное Shevali Помощь студентам 2 31.03.2009 17:23