Question

Pascal: Составить программу для нахождения частного от деления,при условии,что знаменатель больше 5

Answer 1

program das;

var a,b,cha : real;

begin

writeln('Введите числитель и знаменатель:');

readln(a,b);

if b > 5 then

begin

cha := a / b;

writeln('Частное равно ', cha);

end;

end.