Вычислить значение функции - PascalABC.NET (25053)
Формулировка задачи:
Составить схему алгоритма и программу на языке Паскаль для вычисления функции y=f(x) при заданном значении x, которое вводится с клавиатуры.
a=7,2 b=14,3 c=13,4 x=5,6
Решение задачи: «Вычислить значение функции»
textual
Листинг программы
var a,b,c,x,y:real;
Begin
Write('Введите число A: '); Readln(A);
Write('Введите число B: '); Readln(B);
Write('Введите число C: '); Readln(C);
Write('Введите число X: '); Readln(X);
Y:=Sqrt(C*X+62.7*Exp(X))/(A*Sqr(X)+7*X+B*Ln(X));
Writeln('Ответ: ',Y:8:5);
end.
Объяснение кода листинга программы
- Объявлены переменные a, b, c, x, y типа real.
- Выводится сообщение для ввода числа A.
- Введено число A.
- Выводится сообщение для ввода числа B.
- Введено число B.
- Выводится сообщение для ввода числа C.
- Введено число C.
- Выводится сообщение для ввода числа X.
- Введено число X.
- Вычисляется значение функции Y.
- Выводится сообщение с результатом вычисления функции Y.
- Завершается выполнение программы.