|
|
|
|
|||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
#2
22.03.2010, 18:38
|
|||
|
|||
надо углы переводить из градусов в радианы:
Код:
implementation
uses Math;
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
Edit1.Text:= Format('%.2f', [sin(3*PI/2)]);
Edit2.Text:= Format('%.2f', [sin(DegToRad(270))]);
end; |
Древовидный вид