Помогите сделать в паскале. Введите с клавиатуры 2 числа.Напечатать их частное или сообщение"Делить на ноль нельзя".
Помогите сделать в паскале. Введите с клавиатуры 2 числа.Напечатать их частное или сообщение"Делить на ноль нельзя".
Гость
Ответ(ы) на вопрос:
Гостьprogram lol;
var a,b:integer; c : real;
begin
readln(a,b);
if(a = 0) or (b = 0) then writeln('NO')
else
begin
c:= a / b;
writeln(c);
end;
readln;
end.
Не нашли ответ?
Похожие вопросы