Вычислить значение выражения при заданных x, y

@LAtX · Регистрация: 19.09.2012

Author24 — интернет-сервис помощи студентам

помогите решить задачу пожалуйста на паскале
нужно вычислить значение выражения при заданных x, y:
sqrt(sqrt(y+exp(1/3*ln(x-1))))

вот мое решение, но нужны условия что то типа if x<0...

@Vadik1993 · 20.09.2012, 00:03

Pascal

program abc;
label m;
var
c,x,y:real;
begin
m:
write('Введите значение x= ');
readln(x);
write('Введите значение y= ');
readln(y);
if (x=1) or (x=0) or (x<0) then begin
writeln('Значение x должно быть > 1. Введите новое значение переменной x');
goto m;
end
else
c:=sqrt(sqrt(y+exp(1/3*ln(x-1))));
write('Значение выражения c= ',c:4:4);
end.

Типо такое?

@LAtX · 23.09.2012, 17:48 **[ТС]**

спасибо огромное!!

@LAtX 0 / 0 / 0 Регистрация: 19.09.2012 Сообщений: 47
		1
	Вычислить значение выражения при заданных x, y 19.09.2012, 22:40. Показов 2085. Ответов 2 Метки нет (Все метки) помогите решить задачу пожалуйста на паскале нужно вычислить значение выражения при заданных x, y: sqrt(sqrt(y+exp(1/3*ln(x-1)))) вот мое решение, но нужны условия что то типа if x<0... 0

@LAtX 0 / 0 / 0 Регистрация: 19.09.2012 Сообщений: 47
	23.09.2012, 17:48 [ТС]	3
	спасибо огромное!! 0

Вычислить значение выражения при заданных x, y

Решение