Технический форум - Показать сообщение отдельно

DDS · 12.11.2009, 23:41

Вот 2 задача
var
a,b,z,x: real;
begin
read(x);
if x<2.3 then z:=(a+b)/(exp(x)+cos(x));
if (x<=2.3) and (x<5) then z:=(a+b)/(x+1);
if x>=5 then z:=exp(x)+sin(x);
write(z:0:2);
end.

12.11.2009, 23:41	#4 (permalink)
DDS Member Регистрация: 15.02.2009 Сообщений: 695 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 523	Вот 2 задача var a,b,z,x: real; begin read(x); if x<2.3 then z:=(a+b)/(exp(x)+cos(x)); if (x<=2.3) and (x<5) then z:=(a+b)/(x+1); if x>=5 then z:=exp(x)+sin(x); write(z:0:2); end.

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