Напишите программы, которые в зависимости от введенного числа либо вычисляют функцию,...

Question

Напишите программы, которые в зависимости от введенного числа либо вычисляют функцию, либо выдают сообщение, что функция не определена.
y = 6/(x-3)

Answer 1

Program HAHA;
var y,x:integer;
begin
readln(x);
y:=6/(x-3);
if x=3 then 
writeln('функция не определена');
writeln('y=',y);
end.