Показать сообщение отдельно
Старый 15.08.2011, 19:53   #1 (permalink)
Olga89
Новичок
 
Регистрация: 16.07.2011
Сообщений: 5
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 10
Question Задание в Pascal. Подскажите

Здравствуйте!
Помогите, пожалуйста, решить задачку в паскале. Сама не могу разобраться, а подсказать не кому (учусь заочно, 1курс).

Задание: Вычислить значение функции f в точке х. Значение х должно вводиться с клавиатуры. Вывести полученный результат на экран.
Название: DSC01035.jpg
Просмотров: 481

Размер: 88.1 Кб

Вот мой вариант решения. Думаю, что тело программы написано верно, но выдает ошибку в значениях х < 3 и х = 3. Наверно, я неправильно перевела выражения( Здесь я абсолютно запуталась! Помогите пожалуйста!

program k_work_1;
var
x, f : real;
begin
writeln ('введите x');
readln (x);
if x<3 then f:=sqrt(exp(ln(x)*6)-6*(exp(ln(x)*4)+1)-x*x);
if x=3 then f:=ln(cos(x)/sin(x)*((6*x-x*x)/8));
if x>3 then f:=exp(x*x-4)-1;
writeln ('f=', f);
readln;
end.
Olga89 вне форума  
Ads

Яндекс

Member
 
Регистрация: 31.10.2006
Сообщений: 40200
Записей в дневнике: 0
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 55070