и по момему при выполнении программы придется нажать на ентер чтобы дальше программа выполнялась ..точно не скажу..
и не оптимизированно зачем вводить переменную y
program test;
var x: real;
begin
try
writeln('Решение уравнения'
write('Введите x>>'
readln(x);
writeln ('y= ', x*2/3);
except
on System.DivideByZeroException do
writeln('Деление на 0'
on e: System.IndexOutOfRangeException do
writeln(e.Message);
on System.FormatException do
writeln('Неверный формат ввода'
else writeln('Какое-то другое исключение'
end.
Вы должны условие задания сказать, а то помогаешь тут некоторым, а потом оказывается задание в чем-то другом.
Допустим у вас в задании дано y=0, тогда решение x=3y/2 вычисляем и выходит 0
Ждем