Помощь - Поиск - Пользователи - Календарь
Полная версия: Записи о положении точки
Форум «Всё о Паскале» > Pascal, Object Pascal > Задачи
Бина
20.04.2004 22:03
Привет! Помогите пожалуйста решить задачу на записи. unsure.gif
Задача:
Создать записи, определяющие положение точки в декартовой и в полярной системах координат. Считая, что задан массив координат точек в декартовой системе координат, получить соответствующий массив координат заданных точек в полярной системе координат.
Заранее спасибо.
P@sh@
21.04.2004 13:29
ох, еще бы вспомнить, как пересчитать координаты в полярную систему...
r:=sqrt(x*x+y*y);
a:=arctan(y/x);
вроде так... или нет ? в общем, подставишь нужные формулы туда:
Код
type
 xy=record x,y: real end;
 polar=record a,r: real end;
...
procedure XYtoPolar(var a,b);  { здесь а-массив типа xy, b - типа polar, размеры должны быть одинаковы }
var i: integer;
begin
 for i:=Low(a) to High(a) do
   with a[i] do begin
     b[i].a:=...
     b[i].r:=...
   end;
end;
Бина
3.05.2004 23:22
А нельзя ли всю программу полностью, а то я не поняла: что просто добавить эту процедуру после ввода массива и все?
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.