Составить программу вычисления функции - Pascal ABC (12499)

Узнай цену своей работы

Формулировка задачи:

Составить программу вычисления функции y=1-(sin(x))/(1-ln(x+1)) при изменении аргумента x в интервале 0,1<=x<=3,0 с шагом h=0,1

Решение задачи: «Составить программу вычисления функции»

textual
Листинг программы
var x,y:real;
begin
x:=0.1;
while x<3.1 do
 begin
  y:=(1-sin(x))/(1-ln(x+1));
  writeln('x=',x:4:1,' y=',y:6:2);
  x:=x+0.1;
 end;
end.

Объяснение кода листинга программы

  1. Объявляются две переменные типа real: x и y.
  2. Значение переменной x устанавливается равным 0.1.
  3. Задается условие для цикла while: x < 3.1.
  4. Запускается цикл while, который выполняется, пока значение переменной x не станет больше или равно 3.1.
  5. Внутри цикла присваивается значение переменной y: (1-sin(x))/(1-ln(x+1)).
  6. Выводится строка 'x=', с последующим выводом значения переменной x в формате 4:1, и строка ' y=', с последующим выводом значения переменной y в формате 6:2.
  7. Значение переменной x увеличивается на 0.1.
  8. Цикл while повторяется, пока условие не будет выполнено.

Оцени полезность:

8   голосов , оценка 4.125 из 5
Похожие ответы