Помогите пожалуйста с задачей.

@Ксю18 · Регистрация: 04.09.2011

Написать программу которая выводит значение функции y=tgx/2.Вывести значение функции на экран с шагом h на отрезке [a,b].Значение функции выводить построчно по 5 значений в строке. Шаг и отрезок вводить с клавиатуры.

@Puporev · 08.09.2011, 20:12

Pascal

uses crt;
var a,b,h,x,y:real;
    i,j:integer;
begin
clrscr;
write('Введите начало интервала a=');
readln(a);
repeat
write('Введите конец интервала b>',a:0:1,' b=');
readln(b);
until b>a;
repeat
write('Введите шаг табуляции h<',b-a:0:1,' h=');
readln(h);
until h<b-a;
x:=a;i:=0;
while x<=b+h/2 do
 begin
  y:=sin(x)/(2*cos(x));
  write(y:8:2);
  i:=i+1;
  if i mod 5=0 then writeln;
  x:=x+h;
 end;
readln
end.

@Ксю18 0 / 0 / 0 Регистрация: 04.09.2011 Сообщений: 9
		1
	Помогите пожалуйста с задачей. 08.09.2011, 19:48. Показов 1133. Ответов 1 Метки нет (Все метки) Написать программу которая выводит значение функции y=tgx/2.Вывести значение функции на экран с шагом h на отрезке [a,b].Значение функции выводить построчно по 5 значений в строке. Шаг и отрезок вводить с клавиатуры. __________________ Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь 0

Опции темы

Помогите пожалуйста с задачей.

Решение