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

Ответы 3

  • Табулатура постоянно добивает
  • 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.
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years