Ошибка в вашем коде заключается в неправильном использовании оператора if-then-else. Вместо этого вам следует использовать следующее выражение:
Теперь ваш код должен правильно работать и выводить результат деления введенных чисел.
Ошибка в вашем коде заключается в неправильном использовании оператора if-then-else. Вместо этого вам следует использовать следующее выражение:
Var a,b,c:real;begin
read(a,b);
writeln ('Введите 2 числа');
if a > b then
c := a / b
else
c := b / a;
writeln('Частное = ',c)
end.
Теперь ваш код должен правильно работать и выводить результат деления введенных чисел.