Вы используете устаревший браузер. Этот и другие сайты могут отображаться в нём некорректно. Вам необходимо обновить браузер или попробовать использовать другой.
и по момему при выполнении программы придется нажать на ентер чтобы дальше программа выполнялась ..точно не скажу..
и не оптимизированно зачем вводить переменную 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
Ждем
На данном сайте используются файлы cookie, чтобы персонализировать контент и сохранить Ваш вход в систему, если Вы зарегистрируетесь.
Продолжая использовать этот сайт, Вы соглашаетесь на использование наших файлов cookie.