блок схема

[Hairutdinovnr]

Помогите составить блок схему и описание к ней.

Program csl;
var a,b,h,x:real;
begin
write('vvedite otrezok cherz proboel ');readln(a,b);
write('vv chag ');readln(h);
writeln('| x',' | | ','F(x) |');
writeln('|------|-|------|');
while a<=b do
begin
writeln('|',a:0:3,' | | ',sqrt(a)*sqr(cos(x)):0:3,'|');
writeln('|------|-|------|');
a:=a+h;
end;
readln;
end.