ввести с клавиатуры 2 числа.Напечатать их частное или сообщение "делить на ноль нельзя"
pascalABC

Табулатура постоянно добивает

program CrazyCoder;vara, b: integer;c: real;beginreadln(a, b);f(a = 0) or (b = 0) then writeln('Делить на ноль нельзя!')elsebeginc := a / b;writeln(c);end;readln;end.

program CrazyCoder;var  a, b: integer;  c: real;begin  readln(a, b);  if(a = 0) or (b = 0) then writeln('Делить на ноль нельзя!')  else  begin    c := a / b;    writeln(c);  end;  readln;end.