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

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

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль

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

Ответ
 
Опции темы Поиск в этой теме
Старый 11.10.2010, 18:49   #1
vano_18_RUS
 
Регистрация: 11.10.2010
Сообщений: 4
Радость Определить какая из двух точек - М1(х1,у1) или М2(х2,у2) - распаложенна ближе к началу координат.

помогите плз решить задачку на паскале
"Определить какая из двух точек - М1(х1,у1) или М2(х2,у2) - распаложенна ближе к началу координат. Вывести на экран дисплея координаты это точки.
народ еще плз обьясните по какой формуле делали чтоб написать блиг схему.
последняя лаба осталась и зачёт автоматом пойдёт
vano_18_RUS вне форума Ответить с цитированием
Старый 11.10.2010, 20:47   #2
D@rkD@iver
Форумчанин
 
Регистрация: 28.07.2009
Сообщений: 189
По умолчанию

формула вычисления расстояния между двумя точками
l= sqrt((x1-x2)^2+(y1-y2)^2);
пишу программы для студентов и школьников на Pascal, Delphi, C++, WINAPI, assembler
обучаю программированию на паскале(дистанционно);mail: hruslow@gmail.com
D@rkD@iver вне форума Ответить с цитированием
Старый 11.10.2010, 20:55   #3
vano_18_RUS
 
Регистрация: 11.10.2010
Сообщений: 4
Радость

это то есть создаеш еще одну перемену I и делаеш просто вывод ее на экране или как? ну после всех вычислений?
vano_18_RUS вне форума Ответить с цитированием
Старый 11.10.2010, 22:55   #4
Аlex
Форумчанин
 
Регистрация: 16.11.2006
Сообщений: 175
По умолчанию

это считаешь расстояние по этой формуле от начала координат до первой точки и сохраняешь его в переменной I1 а патом считаешь расстояние от начала координат до IIой точки и сравниваешь с переменной I1
чайник юзеру не товарищ, а сам себе враг...
Аlex вне форума Ответить с цитированием
Старый 11.10.2010, 23:35   #5
vlad_light
Пользователь
 
Регистрация: 27.08.2010
Сообщений: 95
По умолчанию

Код:
if (sqr(x1)+sqr(y1) > sqr(x2)+sqr(y2)) then writeln('M1')
else writeln('M2');
это почти правильный ответ)
п.с. таким, как ты я бы "на шару" зачёт ставил... всё-равно толку мало будет.
vlad_light вне форума Ответить с цитированием
Старый 12.10.2010, 11:55   #6
vano_18_RUS
 
Регистрация: 11.10.2010
Сообщений: 4
По умолчанию

чё прям так сложно написать решение этой проги мне эта инфа наф не нужна у меня фак другой, плз зачёт в четверг помогите(((
vano_18_RUS вне форума Ответить с цитированием
Старый 12.10.2010, 13:55   #7
vlad_light
Пользователь
 
Регистрация: 27.08.2010
Сообщений: 95
По умолчанию

Код:
var x1,x2,y1,y2:real;
begin
read(x1,y1,x2,y2);
if (sqr(x1)+sqr(y1) > sqr(x2)+sqr(y2)) then writeln(x1,y2)
else writeln(x2,y2);
end.
На, двоечник)))
п.с. мне, кстати, право, экология, история тоже не нужны. Тем не менее азы я знаю.
vlad_light вне форума Ответить с цитированием
Старый 18.10.2010, 20:28   #8
vano_18_RUS
 
Регистрация: 11.10.2010
Сообщений: 4
Радость

А Блог схему?
vano_18_RUS вне форума Ответить с цитированием
Старый 18.10.2010, 23:53   #9
xrob
Форумчанин
 
Регистрация: 18.10.2010
Сообщений: 419
По умолчанию

а у меня нет зачетов =(
я даже школу не закончил =( ы....
но как-то ведь я писал проги безо всякого инета а значит и вопросов на форуме, в тусклом свете фонарика справочника для начинающих
продирался сквозь кромешные дебри компиляторов....
то и дело натыкался на ошибки и, блин, учился на них!
теперь много чего знаю, причем знания полученные самостоятельно
имеют больший эфект, чем знания, не полученные самостоятельно...
че-то я отвлекся =)

"квадрат гипотеннузы равен сумме квадратов катетов"
уже одной этой фразы лично мне хватило чтоб написать функцию получения расстояния между трехмерными точками...

ну да ладно.
поясняю:
в координатных плоскостях любые две точки образуют
прямоугольный треугольник, т.е. две точки есть,
а третья точка - это точка пересечения параллельных осям x и y прямых, проведенных через эти две точки.

в этом прямоугольном треугольнике гипотеннуза - это расстояние между первыми двумя точками, один катет - это x1-x2, второй катет - это y1-y2.

раз мы ищем расстояние между точками - стало быть нам надо найти гипотеннузу этого прямоугольного треугольника.

кстати,
Цитата:
формула вычисления расстояния между двумя точками
l= sqrt((x1-x2)^2+(y1-y2)^2);
уже говорили...
xrob вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Определить ближайщую к началу координат точку Joker<777> Паскаль, Turbo Pascal, PascalABC.NET 2 05.09.2010 18:20
Определить, какая цифра расположена левее – максимальная или минимальная мария2507 Microsoft Office Excel 4 22.12.2009 16:41
определить радиус и центр окружности, на кот. лежит наиб.число точек заданного на плоскости мн-ва точек) kcю Помощь студентам 0 17.11.2009 19:50
Задача - Определить, какая из двух фигур – круг или квадрат – имеет большую площадь. Incognitoal Microsoft Office Excel 7 05.03.2009 11:36
Определить какая из точек находится ближе к началу координат(алгоритм ветвления). Rakfeller Паскаль, Turbo Pascal, PascalABC.NET 16 25.01.2009 02:01