Вычислить значение выражения - Pascal ABC (12570)

Формулировка задачи:

Вычислить значение выражения. При этом найти область определения функций и обеспечить необходимую реакцию программы на некорректные ситуации.

Код к задаче: «Вычислить значение выражения - Pascal ABC (12570)»

textual
var x,y:real;
begin
write('x=');
readln(x);
if x*x<=4 then write('y не определено')
else
 begin
  y:=ln(x*x-4)/ln(10)+1/x;
  write('y=',y:0:3);
 end;
end.

5   голосов, оценка 4.200 из 5


СОХРАНИТЬ ССЫЛКУ