Нужна блок-схема по инфе!!

Нарисуйте пожалуйста блок-схему в пэинте и пришлите сюда или же скажите какая это форма ветвления, полная или не полная?
Program chislo;
Var a, b: Longint;
Begin
Writeln ('что делим');
Readln (a);
Writeln ('на что делим');
Readln (b);
If b <> 0 then
Writeln (частное от деления',a,'на',b,'равно',a/b);
end.