Program myprg; var x,y: integer; begin writeln('x='); read (x); if (x>=0) then y:=0; if...

Question

Program myprg;
var
x,y: integer;
begin
writeln('x=');
read (x);
if (x>=0) then y:=0;
if (x>0) and (x<=1) then y:=x;<br> else y:=sqr(sqr(x));
writeln ('y=',y);
end.



Program1.pas(9) : Встречено 'else', а ожидался оператор Ошибка выходит помогите

Comments

перед else точка с запятой не ставится

Answer 1

Program myprg;
var
x,y: integer;
begin
writeln('x=');
read (x);
if (x>=0) then y:=0;
if (x>0) and (x<=1) then y:=x<br>else y:=sqr(sqr(x));
writeln ('y=',y);
end.

Comments

спасибо большое