Ответ(ы) на вопрос:
Гостьprogram z3;
var y:real; x:integer ;
begin
writeln('Введите X');
readln(x);
if x>=10 then
y:=sqrt((x-5)/2) else
y:=(x-5)/2;
writeln('При x = ',x ,' y= ',y:4:2);
readln
end.
Не нашли ответ?
Похожие вопросы