Program pv4; var k, z, y, x:integer; begin writeln('введите целые числа-> x, y');...

Question

Program pv4;
var k, z, y, x:integer;
begin
writeln('введите целые числа-> x, y');
readln(x,y);
if x<>y then
z:=x*y
writeln(z)
else
k:=x+y
writeln(k)
end.


пишет, что Встречено 'else', а ожидался оператор. Помогите пожалуйста!!!!

Answer 1

Операторы обьедини в begin end

Comments

это как?

---

Program pv4;
var k, z, y, x:integer;
begin
writeln('введите целые числа-> x, y');
readln(x,y);
if x<>y then begin
z:=x*y;
writeln(z); end
else begin
k:=x+y
writeln(k) end;
end.

---

спс