Найти и исправить ошибки в записи оператора ветвления 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.