Консультация № 185771
07.04.2012, 18:37
69.52 руб.
0 1 1
Уважаемые эксперты! Пожалуйста, ответьте на вопрос:
Нужно составить линейный алгоритм.
Написать программу на языке Object Pascal.
Выполнить программу в среде программирования Turbo Pascal, Free Pascal или консольном приложении Delphi.
Проверить результаты работы программы.
Задано вещественное значение аргумента х. Вычислить значение
функции у.

Обсуждение

Неизвестный
07.04.2012, 21:38
общий
это ответ
Здравствуйте, Посетитель - 383833!

uses crt;
var x,y: real;
begin
clrscr;
write('Vvedite chislo x => ');
readln(x);
y := exp(x) + sin(x);

writeln('y=exp(x)+sin(x)= ',y);
readkey;
end.
Форма ответа