
Вопрос задан 20.01.2019 в 05:05.
Предмет Информатика.
Спрашивает Никитин Александр.
Информатика: Миша плавал в бассейне размером N*M метров и устал. В этот момент он обнаружил, что
находится на расстоянии х метров от одного из длинных бортиков. (не обязательно от ближайших) и y метров от одного из коротких бортиков. Какое минимальное расстояние должен проплыть миша что бы выбраться из бассейна на бортик. Формат вход данных Вводятся 4 натуральных числа: M,N,x,y (N≠M), разделенные пробелами. Все числа не превосходят 100 Формат выходных данных. требуется вывести 1 число-минимальное расстояние которое должен проплыть миша что бы выбраться на бортик Вход: 10,25,7,3 Выход: 3

Ответы на вопрос

Отвечает Рамид Камалов.
Var m,n,x,y,h,m1,m2,min:integer;
begin
readln(m,n,x,y);
if m>n then begin h:=m; m:=n; n:=h; end;
if m-x<x then m1:=m-x else m1:=x;
if n-y<y then m2:=n-y else m2:=y;
if m1<m2 then min:=m1 else min:=m2;
writeln(min);
end.
Пример:
10 25 7 3
3
begin
readln(m,n,x,y);
if m>n then begin h:=m; m:=n; n:=h; end;
if m-x<x then m1:=m-x else m1:=x;
if n-y<y then m2:=n-y else m2:=y;
if m1<m2 then min:=m1 else min:=m2;
writeln(min);
end.
Пример:
10 25 7 3
3


Топ вопросов за вчера в категории Информатика
Последние заданные вопросы в категории Информатика
Предметы
-
Математика
-
Литература
-
Алгебра
-
Русский язык
-
Геометрия
-
Английский язык
-
Химия
-
Физика
-
Биология
-
Другие предметы
-
История
-
Обществознание
-
Окружающий мир
-
География
-
Українська мова
-
Информатика
-
Українська література
-
Қазақ тiлi
-
Экономика
-
Музыка
-
Право
-
Беларуская мова
-
Французский язык
-
Немецкий язык
-
МХК
-
ОБЖ
-
Психология
-
Физкультура и спорт
-
Астрономия
-
Кыргыз тили
-
Оʻzbek tili