
Володарь
7 год назад
Ввести с клавиатуры 2 числа.Напечатать их частное или сообщение "делить на ноль нельзя"
pascalABC
ОТВЕТЫ

Nalesavav
Jul 15, 2019
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.
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.
78