19.03.2012, 20:25 | #1 (permalink) |
Новичок
Регистрация: 19.03.2012
Сообщений: 1
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 10
|
Задача. Паскаль
Вычислить значения функции Z Z= x / ((x-2,3)*(x-2,3)) t+1,2; t>3 X= { 2+t; t<3 ln (t*t-+1); t=3 |
19.03.2012, 20:25 | |
Helpmaster
Member
Регистрация: 08.03.2016
Сообщений: 0
|
Скорее всего по этим ссылкам содержится много полезной для вас информации Задача на языке Паскаль Задача на файлы, Паскаль АВС |
20.03.2012, 18:05 | #2 (permalink) |
support
Регистрация: 19.08.2007
Адрес: Зея
Сообщений: 15,794
Записей в дневнике: 71
Сказал(а) спасибо: 166
Поблагодарили 203 раз(а) в 86 сообщениях
Репутация: 75760
|
Сначала накладывает ограничения на ОДЗ:
Знаменатель дроби не может быть равен 0, поэтому х<>2.3. Теперь о непонятном: Что означает ваше -+1? В целом решение может выглядеть так: Код:
var t,x,z: real; begin writeln('Input t:'); readln(t); if t>3 then x:=t+1.2 else if t<3 then x:=2+t else x:=ln(t*t-1); if x=2.3 then writeln('Nan') else begin z:=x/sqr(x-2.3); writeln('Z=',z:4:8); end; readln end. |
Ads | |
Member
Регистрация: 31.10.2006
Сообщений: 40200
Записей в дневнике: 0
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 55070
|
Опции темы | |
Опции просмотра | |
|
|