Question

СРОЧНО! Зачем присваивать иксу ноль? В данном алгоритме program kitaiskiyaz; var k,x,y:real; begin x:=0; while x=0 do begin writeln('введите k,x'); read (k,x); end; y:=k/x; writeln('y=',y); end.