Ввести с клавиатуры 2 числа.Напечатать их частное или сообщение "делить на ноль нельзя"pascalABC
Ввести с клавиатуры 2 числа.Напечатать их частное или сообщение "делить на ноль нельзя"
pascalABC
Гость
Ответ(ы) на вопрос:
Гость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.
Не нашли ответ?
Похожие вопросы