Помогите исправить ошибки Задание: составить программу на яз. Паскаль с использованием цикла с неизвестным числом повторений для вычислений значения функции F(x)=sin(x)+tg(x) на отрезке [А, В] при изменении аргумента в точках хi = А+iН, где Н – шаг. А=1, В=2, Н=0,125.

Листинг программы:

Program Tabulir;

Var x, y: real;

Begin x:=1;

While x≤2 do begin

y:=sin(x)+tg(x);

writeln (x:9:1, y:16:3);

x:=x+0,125;

End.

1

Ответы и объяснения

  • Sky09
  • профессор
2013-05-23T09:52:59+00:00

Program Tabulir;
Var x, y: real;
Begin
x:=1;
While x<=2 do begin
y:=sin(x)+sin(x)/cos(x);
writeln (x:9:1, y:16:3);
x:=x+0.125;
End;
end.