Помогите по программированию.Составьте программу по этой блок схеме.Очень срочно.Заранее спасибо.

program if1; var a: integer; begin read(a); if a > 0 then Inc(a);   write(a); endможет быть это ?.