Найти и исправить ошибки в записи оператора ветвления if x> =y then begin x: =0; y: =0; else end; write(z)

Если х>=у, то пишет х=0 и у=0
Если не так, то конец; пишем z.
Правильно:
If x>=y;
Then;
Begin
x=0, y=0;
Else
Write z;
End.