Цикл: Используя оператор While, напишите программу вычисления функции y=tg(x) в интервале значений x=0...pi c шагом pi/10

@Reksa · Регистрация: 01.03.2013

Студворк — интернет-сервис помощи студентам

Используя оператор While, напишите программу вычисления функции y=tg(x) в интервале значений x=0...pi c шагом pi/10. Организуйте вывод на экран таблицы значений аргумента и функции.

Заранее благодарен.

@Puporev · 15.03.2013, 13:31

Pascal

uses crt;
var x,h,y:real;
begin
h:=pi/10;
x:=0;
while x<=pi+h/2 do
 begin
  y:=sin(x)/cos(x);
  writeln('x=',x:4:2,'  y=',y:8:3);
  x:=x+h;
 end;
end.

@Reksa 0 / 0 / 0 Регистрация: 01.03.2013 Сообщений: 13
		1
	Цикл: Используя оператор While, напишите программу вычисления функции y=tg(x) в интервале значений x=0...pi c шагом pi/10 15.03.2013, 13:07. Показов 6234. Ответов 1 Метки нет (Все метки) Используя оператор While, напишите программу вычисления функции y=tg(x) в интервале значений x=0...pi c шагом pi/10. Организуйте вывод на экран таблицы значений аргумента и функции. Заранее благодарен. 0

	15.03.2013, 13:31

Опции темы

Цикл: Используя оператор While, напишите программу вычисления функции y=tg(x) в интервале значений x=0...pi c шагом pi/10

Решение