Вычислить значение выражения - Turbo Pascal (35317)

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

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

sin√(x)+1)-sin√(x-1)

Решение задачи: «Вычислить значение выражения»

textual
Листинг программы
Var x,y:real;
Begin
     write('x = ');readln(x);
     y:=sin(sqrt(x+1))-sin(sqrt(x+1));
     writeln('y = ',y:0:2);
     readln;
End.

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

  1. Объявляются две переменные типа real: x и y.
  2. Выводится сообщение «x = », после чего считывается значение переменной x с помощью функции readln.
  3. Вычисляется значение выражения sin(sqrt(x+1))-sin(sqrt(x+1)), где x равно значению переменной x.
  4. Значение выражения сохраняется в переменной y.
  5. Выводится сообщение «y = », после чего выводится значение переменной y с помощью функции write. Функция write использует форматную спецификацию для вывода значения с плавающей точкой с точностью до двух знаков после запятой.
  6. Выводится символ новой строки с помощью функции readln.

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

6   голосов , оценка 3.833 из 5