Консультация № 146148
06.10.2008, 03:14
0.00 руб.
0 4 0
Здравствуйте
Я учусь на 1ом курсе института, так получилось, что в начале года я заболела и теперь не могу написать лабораторную по турбо паскалю(((
Очень нужна помощь

Надо составить программу вычисления Z(x) для произвольного x
{y1-y2, |y1|>=|y2|
z={y1=2*y2, |y1|<|y2|

{Корень из(2=|x|), x<2
y1={4-x^2/2, x>=2

y2=3+x

Помогите пожалуйста, желательно кодом программы

Обсуждение

давно
Профессор
401888
1232
06.10.2008, 06:39
общий
Поскольку все условие "съехало", невозможно разобрать, что написано.
Напмшите четко
при x<2 y1=... y2=...
при |y1|>=|y2| z=...
при |y1|<|y2| z=...
при x>=2 y1=.... y2=...
при |y1|>=|y2| z=...
при |y1|<|y2| z=...
Непонятно например Корень из(2=|x|),



Неизвестный
06.10.2008, 09:36
общий
при x<2 y1= корню из(2+|x|)
при x>=2 y1=4-x^2/2
y2=3+x при любом x
при |y1|>=|y2| z=y1-y2
при |y1|<|y2| z=y1+2*y2

Вроде так
давно
Профессор
401888
1232
06.10.2008, 14:16
общий
Код:
 uses crt;
var x,y1,y2,z:real;
begin
clrscr;
write('x=');readln(x);
y2:=3+x;
if x<2 then y1:=sqrt(2+abs(x))
else y1:=4-x*x/2;
if abs(y1)>=abs(y2)then z:=y1-y2
else z:=y1+2*y2;
write('z=',z:0:3);
readln
end.
Неизвестный
06.10.2008, 22:41
общий
Спасибо большое :)
Форма ответа