Тема: циклические алгоритмы. вычислить значение функции f(x)=√((sin(x))/5) на отрезке [o,b] с шагом h. !

Var o,b,h,f:real;
begin
read(o,b,h);
while o<=b do begin 
F:=(sqrt(sin(o)))/5;
writeln(F);
o:=o+h;
end;
end.