Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.67/21: Рейтинг темы: голосов - 21, средняя оценка - 4.67
 Аватар для alex 12
0 / 0 / 0
Регистрация: 21.01.2014
Сообщений: 15

Вычислить таблицы значений синусов и косинусов углов

21.01.2014, 22:13. Показов 4074. Ответов 2
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Вычислить таблицы значений синусов и косинусов углов в диапозоне от 5 градусов до 30 градусов с шагом 5 градусов и от 40 градусов до 60 градусов с шагом 2 градуса.
0
Лучшие ответы (1)
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
21.01.2014, 22:13
Ответы с готовыми решениями:

Даны стороны треугольника: a,b,c. Вычислить косинусы углов по теореме косинусов
Даны стороны треугольника: a,b,c. Вычислить косинусы углов по теореме косинусов

Программа для вывода таблицы синусов и косинусов заданных углов
Нужно написать программу, которая будет выводить на экран таблицу синусов и косинусов для углов от 0 до 360 градусов с шагом в 10 градусов...

Программа выводит таблицу значений синусов или косинусов
Суть проблемы в том, что не выводит косинусы в диапазоне 90-270... Помогите решить проблему. #include <iostream> #include...

2
561 / 484 / 168
Регистрация: 14.02.2012
Сообщений: 1,561
21.01.2014, 22:32
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
function mySin(x: real): real;
begin
 mySin := sin(x * pi / 180); // перевод в радианы
end;
 
function myCos(x: real): real;
begin
 myCos := cos(x * pi / 180); // перевод в радианы
end;
 
procedure sinTable(start, stop, step: integer);
var
 i: integer;
begin
 i := start;
 repeat
  writeLn('sin ', i, ' = ', mySin(i));
  inc(i, step);
 until i > stop;
end;
 
procedure cosTable(start, stop, step: integer);
var
 i: integer;
begin
 i := start;
 repeat
  writeLn('cos ', i, ' = ', myCos(i));
  inc(i, step);
 until i > stop;
end;
 
procedure printTables(start, stop, step: integer);
begin
 writeLn('Таблица синусов(от ', start, ' до ', stop, ' с шагом ', step, '): ');
 sinTable(start, stop, step);
 writeLn('Таблица косинусов(от ', start, ' до ', stop, ' с шагом ', step, '): ');
 cosTable(start, stop, step);
end;
 
begin
 printTables(5, 30, 5);
 printTables(40, 60, 2);
end.
И вывод
Результат
Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
Таблица синусов(от 5 до 30 с шагом 5): 
sin 5 = 0.0871557427476582
sin 10 = 0.17364817766693
sin 15 = 0.258819045102521
sin 20 = 0.342020143325669
sin 25 = 0.422618261740699
sin 30 = 0.5
Таблица косинусов(от 5 до 30 с шагом 5): 
cos 5 = 0.996194698091746
cos 10 = 0.984807753012208
cos 15 = 0.965925826289068
cos 20 = 0.939692620785908
cos 25 = 0.90630778703665
cos 30 = 0.866025403784439
Таблица синусов(от 40 до 60 с шагом 2): 
sin 40 = 0.642787609686539
sin 42 = 0.669130606358858
sin 44 = 0.694658370458997
sin 46 = 0.719339800338651
sin 48 = 0.743144825477394
sin 50 = 0.766044443118978
sin 52 = 0.788010753606722
sin 54 = 0.809016994374947
sin 56 = 0.829037572555042
sin 58 = 0.848048096156426
sin 60 = 0.866025403784439
Таблица косинусов(от 40 до 60 с шагом 2): 
cos 40 = 0.766044443118978
cos 42 = 0.743144825477394
cos 44 = 0.719339800338651
cos 46 = 0.694658370458997
cos 48 = 0.669130606358858
cos 50 = 0.642787609686539
cos 52 = 0.615661475325658
cos 54 = 0.587785252292473
cos 56 = 0.559192903470747
cos 58 = 0.529919264233205
cos 60 = 0.5
1
 Аватар для alex 12
0 / 0 / 0
Регистрация: 21.01.2014
Сообщений: 15
21.01.2014, 22:39  [ТС]
спасибо большое. а если можно пришлите пожалуйста блок-схему к этой задаче! спасибо
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
21.01.2014, 22:39
Помогаю со студенческими работами здесь

Вычислить значения синусов и косинусов
1. Дано натуральное число N . Вычислить cos1 cos2 cosN ----- * ------ * … * ____ sin1 sin2 sinN

Вычисление синусов и косинусов
Здрям! Есть в M$ Word замечательная вещь - коды полей EQ. Считают много чего, а вот вычисление тригонометрических функций я от них...

Расчет синусов и косинусов
У меня есть программа, которая высчитывает значение синусов, косинусов, тангенсов и котангенсов. Человек вводит число, которое нужно...

Формулы синусов и косинусов
Есть ли какие-нибудь формулы синусов и косинусов, которые позволяют вычислить cos и sin, зная только величину угла? То есть без знания длин...

Вычисляются не те значения синусов/косинусов
Здравствуйте! У меня в коде есть два заданных массива с элементами, при перемножении которых получается третий массив с элементами. Всё...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Новые блоги и статьи
Оттенки серого
Argus19 18.03.2026
Оттенки серого Нашёл в интернете 3 прекрасных модуля: Модуль класса открытия диалога открытия/ сохранения файла на Win32 API; Модуль класса быстрого перекодирования цветного изображения в оттенки. . .
SDL3 для Desktop (MinGW): Рисуем цветные прямоугольники с помощью рисовальщика SDL3 на Си и C++
8Observer8 17.03.2026
Содержание блога Финальные проекты на Си и на C++: finish-rectangles-sdl3-c. zip finish-rectangles-sdl3-cpp. zip
Символические и жёсткие ссылки в Linux.
algri14 15.03.2026
Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая ссылка» (hard link),. . .
[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора
ФедосеевПавел 14.03.2026
Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .
делаю науч статью по влиянию грибов на сукцессию
anaschu 13.03.2026
прикрепляю статью
SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++
8Observer8 10.03.2026
Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:
Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE
8Observer8 10.03.2026
Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .
Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки
Neotwalker 08.03.2026
Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru