Составьте программу вычисления значение Sin, Cos и Tg углов от 0 до 45 градусов с шагом 1 градус (с использованием оператора цикла FOR). Для вы-вода
10-11 класс
|
результата введите ограничение на количество знаков после запятой. Примечание. В Паскале используются стандартные функции: SIN(X) - синус Х (аргумент задается в радианах); COS(X) - косинус Х (аргумент задается в радианах); Для подсчета угла в радианах используйте формулу: угол в радианах = (угол в градусах)*/180. Результат представьте в виде: Программа вычисления значений тригонометрических функций x° Sin(x) Cos(x) Tg(x) 1 2 3 .. 45
uses crt;
var
x,i:integer;
begin
clrscr;
writeln ('X Sin(x) Cos(x) Tg(x)');
i:=2;
for x:=0 to 45 do begin
write (x:2,' ',sin(x*pi/180):0:4,' ',cos(x*pi/180):0:4,' ');
write (sin(x*pi/180)/cos(x*pi/180):0:4);
writeln;
i:=i+1;
if i=24 then
begin
writeln ('Press Enter');
readkey;
end;
end;
readln;
end.
Другие вопросы из категории
В течение семестра студент А.Магистрантов должен выполнить лабораторные работы письменно и в электронном виде. Среди них – 15 письменных работ. Сообщение о том, что работа должна быть выполнена в электронном виде, несет 4 бита информации. Сколько всего лабораторных работ должен выполнить студент А.Магистрантов?
Задание на логику.Очень нужно!)
интервала. № 2. Имеется типизированный файл с числами. Изменить все его элементы, порядковый номер которых кратен трем. Новые значения вводятся с клавиатуры. Размер существующего файла неизвестен.
Читайте также
Составить программу вычисления значений функции F(x) на отрезке [а; b] с шагом h.
Результат представить в виде таблицы, первый столбец которой — значения
аргумента, второй — соответствующие значения функции: "F(x) = 1/2 ctg x/4+4"
2. Составьте программу, определяющую, является ли данное число делителем числа 3.
3*. Составьте программу, заменяющую из двух данных чисел меньшее число суммой, а большее – произведением этих чисел.
2)Составьте программу которая выводит на экран числа кратные 2 и 13 в диапазоне от 2 до 150
3)Дано вещественное число А и целое число N(>0).Испульзуя один цикл вывести все целые степени числа А от 1 до N
------------------------ОПЕРАТОР WHILE