Составьте программу на языке Паскаль: Вводится величина угла в градусах. Найти

Составьте программку на языке Паскаль: Вводится величина угла в градусах. Отыскать его sin и cos.

Задать свой вопрос
Нелли Амбрознак
Напомним, что в Паскале аргумент тригонометрических функций задается в радианах
2 ответа
PascalABC.NET 3.3.5, сборка 1660 от 20.04.2018
Внимание! Если программка не работает, обновите версию!

begin
  var a:=DegToRad(ReadReal);
  Writeln('Cинус равен ',Sin(a):0:13,', косинус равен ',Cos(a):0:13)
end.

Пример
38.4
Cинус равен 0.6211477802783, косинус равен 0.7836934573258
Эмилия Артеева
Паскале аргумент тригонометрических функций задается в радианах, разве нет?
Екатерина Пашонехина
var a:=DegToRad(ReadReal); это он считывает переменную в диапазоне real
Ульяна Городилкина
понятно, спасибо
Серега Хочкин
огромное спасибо!
Var a:real;
begin
read(a);
b:=sin(a);
c:=cos(a);
write(b,' ',c);
end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт