Вычислить все тригометрические функции углов - Turbo Pascal

Формулировка задачи:

Даны условные величины в градусной мере.Разработайте проект,позволяющий: a)вычислить все тригометрические функции углов б)вводить и редактировать данные,с сохранением результатов в)искать значения тригометрических функций, по заданному углу г)выводить результат

Код к задаче: «Вычислить все тригометрические функции углов - Turbo Pascal»

textual
function tg(x: real): real;
begin
  tg := sin(x) / cos(x)
end;
 
function ctg(x: real): real;
begin
  ctg := cos(x) / sin(x)
end;
 
function sec(x: real): real;
begin
  sec := 1 / cos(x)
end;
 
function cosec(x: real): real;
begin
  cosec := 1 / sin(x)
end;
Эта работа вам не подошла?

Вы всегда можете заказать любую учебную работу у наших авторов от 20 руб.

15   голосов, оценка 3.933 из 5


СДЕЛАЙТЕ РЕПОСТ