Вопрос в картинках...

Question

Решите задачу:

Answer 1

Var x,y:real;
begin
write('x=');readln(x);
if x>=5 then y:=9*x else y:=(x*x-4)/4;
writeln('y=',y:6:3);
end.

Comments

а где решение