Помогите, пожалуйста!!! На языке Pascal решить данное выражение. Заранее спасибо!
Помогите, пожалуйста!!! На языке Pascal решить данное выражение.
Заранее спасибо!
Гость
Ответ(ы) на вопрос:
ГостьVar x, y:integer; s:real ; Begin Readln(x, y) ; S:=sqrt(sqr(x) - 2*y); Writeln(s); End.
Гостьvar
s,x,y:real;
begin
write('Введите значение X=');read(x);
writeln('Введите значение Y=');read(y);
S:=sqrt(sqr(x)-2*y);
write('S=',S:5:2);
end.
Не нашли ответ?
Похожие вопросы