Решить задачу в Паскале , блок схему и саму задачу -

F(x)=Система 45x²+5, если x>3,6 и 5x/(10x²+1) ,если x≤3,6

var  x,F:real;  begin  Write('Введите значение аргумента х: ');  Readln(x);  if x > 3.6 then F := 45*x*x+5  else F := 5*x/(10*x*x+1);  Writeln('Значение функции равно ',F)end.Тестовое решение:Введите значение аргумента х: 2Значение функции равно 0.24390243902439Введите значение аргумента х: 4Значение функции равно 725