Pogram lb02;

var x:integer;

y:real;

begin

writeln ('введите x') ;

reardln (x) ;

if (x>3) and (x<=7) then y: = (x*x*x) + exp (1/5*ln (x)) else;

if (x=7) then y:=x + (1/10 * (x) + exp (1/3*ln (x))) else;

if (x=0) and (x<0) then y:=sqrt (abs (x+sin (x))) ;

writeln ('x=','y=') ;

readln

end.

правильно или нет

Правильный ответ на вопрос 👍 «Pogram lb02; var x:integer; y:real; begin writeln ('введите x') ; reardln (x) ; if (x>3) and (x ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!