Вывести положительные значения функции u=tg(23.5tg(2ln3.7k)) на отрезке (2.11, j)

@Чуя · Регистрация: 22.12.2016

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

Составить постановку, алгоритм и программу выдачи на экран в PASCALe положительных значений функции u=tg(23.5tg(2ln3.7k)) на отрезке (2.11, j) - (квадратные скобки) с шагом r.

@Puporev · 05.01.2017, 09:45

Pascal

var j,k,r,a,b,c,u:real;
begin
repeat
write('Введите конец интервала j<2.11 j=');
readln(j);
until j>2.11;
repeat
write('Введите шаг r<',j-2.11:0:2,' r=');
readln(r);
until r<j-2.11;
k:=2.11;
while k<=j do
 begin
  a:=2*ln(3.7*k);
  b:=sin(a)/cos(a);
  u:=23.5*sin(b)/cos(b);
  if u>0 then writeln('k=',k:5:2,' u=',u:9:3);
  k:=k+r;
 end;
end.

@Чуя 0 / 0 / 0 Регистрация: 22.12.2016 Сообщений: 3
		1
	Вывести положительные значения функции u=tg(23.5tg(2ln3.7k)) на отрезке (2.11, j) 04.01.2017, 20:39. Показов 1147. Ответов 1 Метки нет (Все метки) Составить постановку, алгоритм и программу выдачи на экран в PASCALe положительных значений функции u=tg(23.5tg(2ln3.7k)) на отрезке (2.11, j) - (квадратные скобки) с шагом r. 0

	05.01.2017, 09:45

Опции темы

Вывести положительные значения функции u=tg(23.5tg(2ln3.7k)) на отрезке (2.11, j)

Решение