Выберите строки, в которых условные операторы на языке Pascal записаны без ошибок.

if x>0 then y:= 100 div x; else y:= 0;

if x>0 or y>0 then k:= k+1 else k:= 0;

if 10 then k:= k+1;

if (x mod y=0) then else writeln(‘no’)

if x<>0 then y:=100/x;

if x