23.04.2009, 23:26
|
|
Участник форума
Регистрация: 26.11.2008
Сообщений: 158
С нами:
9187097
Репутация:
158
|
|
1.
y:=sqrt(1-sqr(cos(x)*cos(x)));
2.
Код:
Program xya2;
uses crt;
var x,y:real;
begin
writeln('BBeguTe X');
readln(x);
if (x<=0) then
y:=cos(x)*(5-3*x)
else
y:=2*sqrt(x);
writeln('Y = ',y);
readln();
end.
Неужели нет интереса научится хотябы немного программировать?=\
Последний раз редактировалось fker; 23.04.2009 в 23:35..
Причина: cosx^2
|
|
|