Протабулировать функцию у = sin(x+ i) на отрезке [0;i]с шагом h=0,01*i, где i – номер варианта. Результаты вычислений вывести на экран в виде таблицы пар чисел х и у .   вычислить количество отрицательных значений функции у. Оп...

Протабулировать функцию у = sin(x+ i) на отрезке [0;i]с шагом h=0,01*i, где i – номер варианта. Результаты вычислений вывести на экран в виде таблицы пар чисел х и у .   вычислить количество отрицательных значений функции у. Определить ее максимальное значение. program Tabulfuncii; const i = 6; var x, h,y, max, min , k : real; begin k:=0; h:= 0.01*i; x:= 0; max:= sin(x+i); min:= sin(x+i); writeln (' õ ó'); repeat y:= sin(x+i); writeln(x:7:2, y:7:2); if y > max then max:=y; x:= x + h; until x > i + h/2; writeln('max =', max:5:2); if y < min then min:=y+0; writeln('Количество отрицательных=',k); end. Как сделать просчет отрицательных
Гость
Ответ(ы) на вопрос:
Гость
const i = 6; var x, h,y, max,k : real; begin k:=0; h:= 0.01*i; x:=0; max:= sin(x+i); writeln ('x':6, 'y':6); repeat   y:= sin(x+i);   writeln(x:7:2, y:7:2);   if y > max then max:=y;   if y < 0 then k:=k+1;   x:= x + h; until x > i + h/2; writeln('max =', max:5:2); writeln('Количество отрицательных=',k); end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы